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IDENTIFICATION 
PRODUCT CODE: AC-F 636C-MC 
PRODUCT NAME: CKFPCCO FP11F FLTG PNT PRT C 
PRODUCT DATE: APRIL, 1981 
MAINTAINER: DIAGNOSTIC ENGINEERING 
‘AUTHOR: ANTHONY VEZZA, DAN MILLEVILLE 
THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT 
NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL 
EQUIPMENT CORPORATION. DIGITAL EQUIPMENT CORPORATION ASSUMES NO 
RESPONSIBILITY FOR ANY ERRORS THAT MAY APPEAR IN THIS DOCUMENT. 
NO RESPONSIBILITY IS ASSUMED FOR THE USE OR RELIABILITY OF 
SOF TWARE ON EQUIPMENT THAT IS NOT SUPPLIED BY DIGITAL OR ITS 
AFFILIATED COMPANIES. 


COPYRIGHT (C) 1979, 1981 BY DIGITAL EQUIPMENT CORPORATION 
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NO CHANGES TO THE 11/34 FLOATING POINT DIAGNOSTIC PART *A* WERE 
FOUND TO BE NEEDED TO ADAPT IT FOR USE ON THE 11/44. 


THE FOLLOWING WAS ADDED TO THE 11/34 +e gechgta POINT DIAGNOSTIC 
TO MAKE THE ‘B* VERSION COVER THE 11/44 


1. TEST 22 = PROCESSOR LOOKS TO SEE IF APT IS CON- 
TROLLING THF TEST, AND_ IF IT IS, CHECKS TO SEE 
IF THE USER HAS SELECTED THIS TEST BY CHECKING 
BIT 7 IN THE SWITCH REGISTER. IT HAS ALSO BEEN 
CHANGED SO THAT IF BIT 7 IS *ONE*, THE CODE WILL 
SELECT THE TEST. 


THE FOLLOWING WAS ADDED TO THE 11/34 FLOATING POINT DIAGNOSTIC 
TO MAKE THE ‘C* VERSION COVER THE 11/44: 


1. TEST 76 - CHECKS THAT FP PROCESSOR DOESN'T ACCESS 
D-SPACE UNTIL CONDITIONS WARRANT. 


2. TEST 77 TO 106 = CHECKS THAT SR1_ MATCHES WHAT 
ACTUALLY HAPPENED TO THE REGISTER OF THE INSTRUC- 
TION, AND THAT THE VALUE OF AUTO INCREMENT/ 
DECREMENT WAS PROPER, 


i. a WAS ADDED TO THE 'C* VERSION TO FURTHER INTENSIFY 
H 


1. TEST 77 - A BYTE TABLE OF EXPECTED DATA FOR SRI 
CHECKS TO MAKE SURE THAT THE VALUE OF THE  INCRE- 
MENT/DECREMENT IS PROPER FOR THAT INSTRUCTION. 


ALL THREE PARTS WERE RE-RELEASED WITH A NEW SYSMAC THAT CHECKS BIT O OF THE CPU 
ERROR REGISTER (POWER MONITOR BIT). THE ADDITIONS WERE MADE IN THE SCOPE 
ROUTINE, EXECUTED AT THE BEGINNING OF EACH TEST, AND THE ERROR CALL ROUTINE. 

IF THE BIT BECOMES SET, AN ERROR IS CALLED FROM THE SCOPE ROUTINE. THE BIT IS 
CLEARED, AND THE TEST IS CONTINUED. IF THE BIT BECOMES SET IN THE MIDDLE OF A 
TEST, AND AN ERROR OCCURS FOR ANY REASON, THE ERROR ROUTINE WILL CALL *TWO* 
ERRORS, THE POWER MONITOR BIT ERROR FIRST, THEN THE ERROR ORIGINALLY CALLED. 

IN ADDITION, THE $READ ROUTINE NOW CHECKS FOR A RANDOMLY INPUTED “Q BEFORE A 
mA TYPED. THIS BECAME NECESSARY WITH CERTAIN DATA CONNECTIONS OF SOME SYS~ 
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THE THREE PROGRAMS: 
CKFPAAO CKFPBAQ CKFPCCO 


ARE DESIGN TO DETECT AND REPORT LOGIC FAULTS IN THE 
PDP 11/44 FP11-F FLOATING POINT PROCESSOR. THE 
DESIGN IS AN ATTEMPT TO REACH ALL ROM STATES, TAKE 
ALL BRANCH MICRO TESTS (BUT'S) AND VERIFY ALL THE 
LOGIC. THEY CONSIST OF 167 (OCT) INDIVIDUAL TESTS 
SEQUENCED TO DETECT AND ATTEMPT TO IDENTIFY FAULTS 
WITH A MINIMUM HARDWARE OR SOFTWARE LEVEL. THE 
TESTS ARE PARTIONED INTO THREE STAND-ALONE PROGRAMS 
DESCRIBED BELOW. 


NOTE THAT ERROR REPORTS IN THESE PROGRAMS ARE BASED 
UPON THE KNOWLEDGE THAT ALL PREVIOUS TESTS HAVE BEEN 
RUN AND IN MOST CASE THAT THERE IS ONLY A_ SINGLE 
POINT FAULT IN THE FP11-F. IF THE PROGRAMS OR TESTS 
te Re se IN ORDER THEN ERROR MESSAGES MAY NOT BE 
A . 


A, CKFPAAO 

CKFPAAQ TESTS: 
LDFPS 
STFPS 


CFCC 
SETF, SETD, SETI AND SETL 
STST 


LDF AND LDD (ALL SOURCE MODES) 
STD (MODE 0 AND 1) 
ADDF, ADDD AND SUBD (MOST CONDITIONS) 


B. CKF PBAO 


CKFPBAO TESTS: 
ADDF, ADDD AND SUBD (ALL CONDITIONS NOT 
TESTED IN CKFPAAQ) 
CMPD AND CMPF 
DIVD AND DIVF 
MULD AND MULF 
MODD AND MODF 


C. CKFPCCO 

CKFPCCO TESTS: 
STF AND STD (ALL MODES) 
STCFD AND _ STCDF 


CLRD AND CLRF 
NEGF AND NEGD 


SEQUENCE 
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194 ABSF AND ABS 
195 TSTF AND TSTD 
1 NEGF, ABSF AND TSTF (ALL SOURCE MODES) 
197 NEGF. ABSF AND TSTF (ALL SOURCE MODES) 
198 LDFPS (ALL SOURCE MODES) 
199 LDCIF AND LDCLF 
LDCID AND LDCLD 
201 LDEXP 
| 202 STFPS (ALL DESTINATION MODES) 
203 STCFL AND STCFI 
204 STCDL AND STCDI 
205 STEXP 
206 STST 
207 ‘ 1 AND D SPACE TESTS (ALL MODES AND REGS 0 AND 7) 
$08 AUTO INCREMENT/DECREMENT CHECK = SR1 (ALL MODES AND REGS 1 AND 7) 
210 
211 2. REQUIREMENTS 
212 ed 
213 
214 2. EQUIPMENT 
215 A PDP 11/44 WITH CONSOLE AND AN FP11-F FLOATING 
216 POINT PROCESSOR. NOTE THAT A SPECIAL INTERRUPTS TEST 
217 MODULE IS BEING DESIGNED FOR USE IN THE MANUFAC- 
218 TURING ENVIRONMENT. WHEN THIS DEVICE IS PRESENT THE 


PROGRAM CKFPBAO WILL MAKE USE OF IT TO TEST THE FPP 
INTERRUPT ON BUS REQUEST FUNCTIONS. 


2.2 STORAGE 


ALL THREE PROGRAM REQUIRE A MEMORY SYSTEM OF AT 
LEAST 16K TO LOAD AND RUN. 


2.3 PRELIMINARY PROGRAMS 
THESE THREE DIAGNOSTICS WILL ASSUME THAT THE PDP 
11/44 CENTRAL PRPOTESSOR IS FAULTLESS, THEREFORE WHEN 


IN DOUBT RUN THE PDP 11/44 PROCESSOR DIAGNOSTICS 
BEFORE THESE FP11-F DIAGNOSTICS. 


3. LOADING PROCEDURE 


THE PROGRAMS WILL BE SUPPLIED ON _ THE USUAL 
DIAGNOSTIC MEDIA. REFER TO THE XXDP OPERATING 
MANUAL FOR FURTHER INFORMATION, 


4. STARTING PROCEDURE 


4.1 CONTROL SWITCH SETTINGS 
SEE SECTION 5.1 
4.2 PROGRAM AND OPERATGR ACTION 
* pin 
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. LOAD PROGRAM INTO MEMORY 

. LOAD ADDRESS 200 
SET win SWITCHES (IF CONSOLE IS PRESENT) 
PRESS STAR 


ON FIRST Pass, THE PROGRAM 

WILL IDENTIFY ITSELF. NOTE THAT IF THERE IS 
NO PHYSICAL CONSOLE THO PROGRAM WILL REQUEST 
THE OPERATOR FOR INITIAL VALUE FOR_ THE 
SOFTWARE SWITCH REGISTER (SEE SECTION 8.5). 
cae ee ee UNDER ACT, APT OR CHAIN THIS DOES 
N 


5. THE PROGRAM WILi LOOP AND AN END OF PASS AND 
ERROR SUMMARY WILL BE TYPED AT THE END OF 
EVERY PASS. 


OPERATING PROCEDURE 


OPERATIONAL SWITCH SETTINGS 
THE SWITCH SETTING ARE: 


SW<15>=1. 100000 HALT ON ERROR 

Sw<l4>=1... 40000 LOOP ON CURRENT TEST 

Sw<1 3521.4 20000 INHIBIT ERROR TYPE OUTS 

SW<12>:1... ' 0000 INHIBIT T-BIT TRAPPING 

SW<11>='... 4000 INHIBIT ITERATIONS 

SwW<10>2! 5... 2000 RING TTY BELL ON ERROR 

Sw<9>=1.... 1000 LOOP ON ERROR 

SW<B>=1 600 400 LOOP ON TEST SPECIFIED 
THROUGH SW<Q> 

Su<7>el.... 200 PRINT ERROR SUMMARY €£ 
SW<13>=1, THIS APPLIES ONLY 
PROGRAM CKFPAAO. 

SW<7>=1i cs 200 SELECT CORRECT INTERRUPT 
PROGRAM CKFPBAQ. 

ERRORS 
SUMMARIES 


IN PROGRAM CKFPAAQ TESTS 1 AND 11 HAVE A SPECIAL 
ERROR SUMMARY FEATURE. THESE TWO TEST RUN MANY 
TEST PATTERNS THROUGH THE LOGIC. AFTER AN _ ERROR 
IS ENCOUNTERED, ONLY THE FIRST FIVE ERRORS ARE 
REPORTED (TYPED ON THE TTY). EVERY ERROR THOUGH IS 
LOGGED AND AN ERROR SUMMARY IS PRINTED WHEN THE 
TEST IS COMPLETE. NOTE THAT IS SW<13>=i THIS 
SUMMARY WILL NOT BE TYPED UNLESS SW<7>=1. IN OTHER 
WORDS TO GET JUST AN ERROR SUMMARY FROM EITHER OF 
THESE TWO TESTS 1 AND 11 IN PROGRAM CKFPAAQ BOTH 
SWITCHES 13 AND 7 MUST = 1. 


ERROR RECOVERY 
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SW<15:9>=0... MOST ERRORS WILL CAUSE EXECUTION TO 
GO TO THE START OF THE NEXT TEST 
AFTER THE MESSAGE IS TYPED. A_ FEW 
TESTS ARE IN SECTIONS. IN THESE 
TESTS AN ERROR WILL CAUSE EXECUTION 
TO GO TO THE 'JEXT SECTION AFTER THE 
MESSAGE IS TYPED. 

SW<15>=1.. THE PROGRAM WILL HALT AFTER TYPING 
THE ERROR MESSAGE. PRESSING THE 
CONSOLE CONTINUE WILL CAUSE THE 
PROGRAM TO CONTINUE AS IF SW<15>=0. 


RESTRICTIONS 


NONE 


EXECUTION TIMES 
LESS THAN 10 SECONDS FOR EACH PROGRAM ON ANY PASS. 
STACK POINTER 


THE STACK POINTER IS INITIALIZED TO 1100 IN EACH OF 
THE THREE PROGRAMS. 


PASS COUNT 

THE PROGRAM MAKES ONE PASS FOR EACH END OF PASS 
MESSAGE TYPED. THE END OF PASS MESSAGE DESCRIBES 
THE TOTAL NUMBER OF PASSES COMPLETED AND THE TOTAL 
NUMBER OF ERRORS SINCE THE LAST END OF PASS MESSAGE._ 


T-BIT TRAPPING 


IF SW<12>=0 EACH PROGRAM WILL RUN WITH TRACE TRAPS 
ON EVERY OTHER PASS. FIRST PASS WILL _NOT ENABLE 
TRACE TRAPS. NOTE SwW<12>=1 DISABLES T-BIT TRAPS. 


SOFTWARE SWITCH REGISTER 


IF THE USER DESIRES, A SOFTWARE SWITCH REGISTER CAN 
BE EXAMINED OR MODIFIED AT ANY TIME BY THE USER IF 
HE TYPES CNTRL/G WHILE THE PROGRAM IS RUNNING. THIS 
CNTRL/G WILL CAUSE THE CONTENTS OF THE SOFTWARE 
SWITCH REGISTER TO 3E TYPED ON THE TTY AND ASK THE 
USER FOR A NEW VALUE. WHEN THE USER TYPES A VALUE 
AND CARRIAGE RETURN THEN THE PROGRAM WILL RESUME 
TESTING AT THE SAME POINT AT WHICH IT LEFT OFF WHEN 
THE USER TYPED CNTRL/G. NOTE THAT WHEN NOT RUNNING 
UNDER ACT, APT OR CHAIN THE USER WILL BE ASKED 


FOR A SOFTWARE SWITCH REGISTER VALUE AFTER LOADING 


ADDRESS 200 AND STARTING THE PROGRAM THE FIRST TIME 
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THE PROGRAM IS RUN AFTER LOADING ONLY IF THE 
CONSOLE SWITCH REGISTER CONTAINS 177777. 


INTERRUPTS TEST 


IN PROGRAM CKFPBAO THERE IS A SPECIAL TEST FOR 
CHECKING THE CORRECT FLOWS OF THE FPP. THIS TEST 
CAN BE RUN ONLY IF A SPECIAL TEST MODULE IS_ IN_ THE 
SYSTEM. THIS MODULE WILL PROBABLY ONLY BE USED IN 
MANUFACTURING. IF THIS MODULE IS NOT IN THE SYSTEM 
THIS TEST WiLL AUTOMATICALLY BE DESELECTED. IF THIS 
TEST MUDULE IS ON THE SYSTEM AND SwW<7>=1 THIS TEST 
WILL BE RUN. IF SW<7>=0, THIS TEST WILL BE 
DESELECTED. 


ACT, APT AND XXDP COMPATIBILITY 
THE SE eee ARE FULLY COMPATIBLE WITH: 


ACT 
XXDP MONITOR AND CHAIN PROGRAMS. 


PROGRAM DESCRIPTION 


STF WITH ILLEGAL ACCUMULATOR TEST 


THIS IS A TEST OF THE ST INSTRUCT JON © USING ILLEGAL 
ACCUMULATOR 7, MODE 0. ; 


Cilia ie lteee enelientieerterinententnen teneientiaeieeiendmetiend eee 


THIS IS A TEST OF THE STF INSTRUCTION USING FDST 
MODE 1 


FDST MODE 2 TEST 


THIS IS A TEST OF BOTH STF AND STD WiTH FDST MODE 2. 
FDST MODE 2, WITH GR7, TEST 


kad bj IS A TEST OF STF WITH GR7 MODE 2 OR’ IMMEDIATE 
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THIS 


THIS 


THIS 


THIS 
STD. 


THIS 


USING S 


THIS 


THIS 


THIS 


THIS 


THIS 


SEQUENCE 


FDST MODE J TEST 


IS A TEST OF STD WITH FDST MODE 4. 
FDST MODE 3 TEST 


IS A TEST OF FDST MODE 3 USING STD. 
FDST MODE 5 TEST 


IS A TEST OF FDST MOLE 5 USING STD. 
FDST MODE 6, INDEX MODE, TEST 


IS A TEST OF FDST MODE 6, INDEX MODE, USING 


FDST MODE 7, INDEX DEFERRED MODE, TEST 


go TEST OF FDST MODE 7, INDEX DEFERRED MODE, 


STCFD TEST 


IS A TEST OF THE STCFD INSTRUCTION. 
STCDF TEST 


IS A TEST OF THE STCDF INSTRUCTION, 
STCFD WITH ILLEGAL ACCUMULATOR TEST 


TEST STCFD WITH ILLEGAL AC 6. 
CLRD TEST 


IS A TEST OF THE CRLF AND CLRD INSTRUCTIONS. 
CLRD WITH ILLEGAL ACCUMULATOR TEST 


IS A TEST OF CLRD WITH ILLEGAL AC7. 
NEGF, ABSF AND TSTF SOURCE MODE i. WITH ILLEGAL AC7, TEST 


IS A TEST OF THE SPECIAL DEST FLOWS USING THE 


—CKFPCCO FPTIF FLTG PNT PRT C 





TEST 
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NFGD INST WITH MODE ZERO AND ILLEGAL AC7. 
NEGF, ABSF AND TSTF SOURCE MODE 0 TEST 


THIS IS A TEST THE NEGF, ABSF AND TSTF SOURCE FLOWS. 
THE NEGD INSTRUCTION IS USED TO TEST MODE 0 


NEGF, ABSF AND TSTF SOURCE MODE 1 TEST 


THIS IS A TEST THE NEGF, ABSF AND TSTF SOURCE FLOWS. 
THE NEGD INSTRUCTION IS USED TO TEST MODE 1 


NEGF, ABSF AND TSTF SOURCE MODE 2 TEST 


THIS IS A TEST THE NEGF, ABSF AND TSTF SOURCE FLOWS. 
THE ABSD INSTRUCTION IS USED TO TEST MODE 2 


NEGF, ABSF AND TSTF SOURCE MODE 4 TEST 


THIS IS A TEST THE NEGF, ABSF AND TSTF _— FLOWS. 
THE ABSD INSTRUCTION IS USED TO TEST MODE 4 


NEGF, ABSF AND TSTF SOURCE MODE 3 TEST 


THIS IS A TEST THE NEGF, ABSF AND TSTF SOURCE FLOWS. 
THE ABSD INSTRUCTION IS USED TO TEST MODE 3 


NEGF, ABSF AND TSTF SOURCE MODE 5 TEST 


THIS IS A TEST THE NEGF, ABSF AND TSTF SOURCE FLOWS. 
THE NEGD INSTRUCTION I° USED TO TEST MODE 5 


NEGF, ABSF AND TSTF SOURCE MODE 6 TEST 


THIS IS A TEST THE NEGF, ABSF AND TSTF SOURCE FLOWS. 
THE ABSD INSTRUCTION IS USED TO TEST MODE 6 


NEGF, ABSF AND TSTF SOURCE MODE 7 TEST 


THIS IS A TEST THE NEGF, ABSF AND TSTF SOURCE FLOWS. 
THE ABSD INSTRUCTION IS USED TO TEST MODE 6 


NEGF, ABSF AND TSTF SOURCE MODE 6, GR7, TEST 


THIS IS A TEST THE NEGF, ABSF AND TSTF SOURCE FLOWS. 
THE NEGD INSTRUCTION IS USED TO TEST MODE 6 


NEGF, ABSF AND TSTF SOURCE MODE 7, GR7, TESi 


—*e@ @ « ————- --—-— --- — —_— ee ee 
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562 FLOWS MODE 4 USING THE NEGD INSTR. 
SPECIAL DEST, MODE 3, TEST 


55 a nnn n nnn nnnnnnnennnnnnnennnnnenn= 
Ls Se 
! 538 THIS IS A TEST THE NEGF, ABSF AND TSTF a FLOWS. 
#24 THE ABSD INSTRUCTION IS USED TO TEST MODE 7 
be Sat TEST 32 SPECIAL DEST, MODE 0, TEST 
Bhs Bg Be ge ESE 52 am 
544 THIS IS A TEST OF THE NEGF ABSF AND TSTF DESTINATION 
ez FLOWS MODE 0 USING THE NEGD INSTR. 
984 TEST 33 SPECIAL DEST, MODE 1, TEST 
549 
> POR THIS IS A TEST OF THE NEGF ABSF AND TSTF DESTINATION 
rah FLOWS MODE 1 USING THE NEGD INSTR. 
go; TEST 34 SPECIAL DEST, MODE 2, TEST 
555 THIS IS A TEST OF THE NEGF ABSF AND TSTF DESTINATION 
rt FLOWS MODE 2 USING THE NEGD INSTR. 
coe js TEST 35 SPECIAL DEST, MODE 4, TEST 
560 ae 
561 © ' THIS IS A TEST OF THE NEGF ABSF AND TSTF DESTINATION 


THIS IS A TEST OF THE NEGF ABSF AND TSTF DESTINATION 
FLOWS MODE 3 USING THE NEGD INSTR. 


SPECIAL DEST, MODE 5, TEST 


THIS IS A TEST OF THE NEGF ABSF AND TSTF DESTINATION 
FLOWS MODE 5 USING THE NEGD INSTR. 


SPECIAL DEST, FLOATING MODE 2, TEST 


THIS IS A TEST OF THE NEGF ABSF AND TSTF DESTINATION 
FLOWS MODE 2 USING THE NEGF INSTR. 


SPECIAL DEST, MODE2, GR7 (IMMEDIATE), TEST 


THIS IS A TEST OF THE NEGF ABSF AND TSTF DESTINATION 
FLOWS MODE 2( IMMEDIATE) USING THE NEGD INSTR. 


SPECIAL DEST, MODE 6, TEST 


THIS !S A TEST OF THE NEGF ABSF AND TSTF DESTINATION 
FLOWS MODE 6 USING THE NEGD INSTR, 





———— 
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594 TEST 43 SPECIAL DEST, MODE 7, TEST 


THIS IS A TEST OF THE NEGF ABSF AND TSTF DESTINATION 
598 Ts) I, FLOWS MODE 7 USING THE NEGD INSTR. 


600 oo TEST 44 NEGD, ABSD AND TSTD TEST 


os 


| 
| 
| 
| 597 
| 
| 


THIS IS A_ TEST OF THE NEGD ABSD AND TSTD 
INSTRUCTIONS. 


SOURCE MODES, MODE 1 (FL=0), TEST 


THIS IS A TEST OF SOURCE MODE 1 USING THE LDFPS 
INSTRUCTION. 


SOURCE MODES, MODE 2 (FL=0), TEST 


THIS IS A TEST OF SOURCE MODE 2 USING THE LDFPS 
INSTRUCTION. 


SOURCE MODES, MODE 4 (FL=0), TEST 


THIS IS_A TEST OF SOURCE MODE 4 USING THE LDFPS 
INSTRUCTION. 


SOURCE MODES, MODE 3 (FL=0), TEST 


THIS IS A TEST OF SOURCE MODE 3 USING THE LDFPS 
INSTRUCTION. 


SOURCE MODES, MODE 5 (FL=0), TEST 


THIS IS A TEST OF SOURCE MODE 5 USING THE LDFPS 
INSTRUCTION. 


SOURCE MODES, MODE 6 (FL=0), TEST 


THIS IS A TEST OF SOURCE MODE 6 USING THE LDFPS 
INSTRUCTION. 


SOURCE MODES, MODE 7 (FL=0), TEST 


THIS IS A TEST OF SOURCE MODE 7 USING THE LDFPS 
INSTRUCTION 
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66 


THIS IS A TEST OF THE LDCLD WITH IMMEDIATE 
ADDRESSING MCDE 


SOURCE MODES, MODE 2 (FL=1), TEST 


THIS IS A TEST OF THE LDCLD INSTRUCTION WITH MODE 2. 
LDCIF AND LDCLF TEST 


THIS IS A_ TEST OF THE LDCIF AND’ THE LDCLF 
INSTRUCTIONS. “ 


LDCID AND LDCLD TEST 


THIS IS A TEST OF LDCID AND LDCLD 
LDEXP TEST 


THIS IS A TEST OF THE LDEXP INST A_ SUBROUTINE IS 
USED TO SET UP_OPERANDS, EXECUTE THE LDEXP INST AND 
CHECK THE RESULTS. 


DESTINATION MODES, MODE 1 (FL=0), TEST 


THIS IS A TEST OF DESTINATION MODE 1 USING THE STFPS 
INSTRUCTION 


DESTINATION MODES, MODE 2 (FL=0), TEST 


THIS IS A TEST OF DESTINATION MODE 2 USING THE STFPS 
INSTRUCTION 


DESTINATION MODES, MODE 4 (FL=0), TEST -—— .. 


THIS IS A TEST OF DESTINATION MODE 4 USING THE STFPS 
INSTRUCTION 


DESTINATION MODES, MODE 3 (FL=0), ‘TEST 


THIS IS A TEST OF DESTINATION MODE 3 USING THE STFPS 
INSTRUCT ION 


DESTINATION MODES, MODE 5 (FL=0), TEST 


THIS IS A TEST OF DESTINATION MODE 5 USING THE STFPS 
INSTRUCTION 


DESTINATION MODES, MODE 6 (FL=0), TEST 


SEQUENCE 13 


' 
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THIS IS A TEST OF DESTINATION MODE 6 USING THE STFPS 
INSTRUCTION 


TEST 67 DESTINATION MODES, MODE 7 (FL=0), TEST 


he 


SEQUENCE 14 
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THIS IS _A_ TEST OF DESTINATION MODE 7 USING THE STFPS 
INSTRUCTION 


DESTINATION MODES, MODE 2 (FL=1), TEST 


THIS IS A TEST OF DESTINATION MODE 2 USING STCOL 
WITH REGISTER 0 


DESTINATION MODES, MODE 4 (FL=1), TEST 


THIS IS A TEST OF DESTINATION MODE 4 USING STCDL 
WITH REGISTER 0 


STCDI AND STCDL TEST 


THIS IS A vent OF THE STCDI AND STCDL INSTRUCTIONS. 
NOTE THAT SUBROUTINE, STCSUB, IS USED TO SET UP 
. OPERANDS. EXECUTE THE STC INSTRUCTION AND CHECK 
H = U . 


STCFL AND STCFI TEST 


THIS IS A TEST OF STCFL_AND STCFI. IT MAKES USE _ OF 
THE SAME SUBROUTINE, STCSUB, WHICH WAS USED TO TEST 
STCDL AND STCDI. 


STEXP TES! 


THIS IS A TEST OF THE STEXP INSTRUCTION 
STST TEST 


THIS IS A TEST OF THE STST INSTRUCTION. FIRST AN 
ILLEGAL FPS OP CODE (INSTRUCTION) IS USED TO ENTER 
AN ERROR CONDITION IN THE FEC AND FEA. THE STST IS 
EXECUTED AND THE FEC AND FEA ARE CHECKED 


D-SPACE NON-ACCESS TEST 


THIS IS A TEST THAT ENABLES D-SPACE, BUT MAKES IT 
NON-RESIDENT, CAUSING A MEMORY MANAGEMENT TRAP 
SHOULD IT BE ACCESSED DURING AN’ INSTRUCTION THAT 
WILL NOT NORMALLY ACCESS D=SPACE. 


AUTO INCREMENT/DECREMENT TEST 


THIS IS A_TEST THAT ENABLES DSPACE, BUT MAKES IT 
NON-RESIDENT IN THE AREA OF THE TEST, FORCING A 
MEMORY MANAGEMENT TRAP FOR EVERY FPP INSTRUCTION IN 


mo 


—_—————_—_ —___ 


| 
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-THE TEST. SR1_ IS THEN EXAMINED FOR PROPER CONTENTS. 


SHOULD THE FPP INSTRUCTION FAIi TO ABORT, THE NEXT 
INSTRUCTION IS AN IOT TRAP, AND CALLS AN ERROR TO 
ANOUNCE THE FPP INSTRUCTION’S FAILING TO CAUSE AN 
ABORT, NOT ALLOWING PROPER EXAMINATION OF SRI. 


LISTING 
& 


MNUMBER=444 
PROGNUM= 3 


SEQUENCE 


Nee 
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1605 .MCALL .HEADER,.SWRHI,.EQUAT,.SETUP,.$CATCH,.$ACT11 

1606 -MCALL .$EOP,.$SAVE,.$TYPOCT,.$CMTAG 

1607 -MCALL .$TYPDEC,.$TRAP,.$POWER,.$APTHDR,.$APTBLS 

1608 -MCALL .$APTYPE,.$READ 

1609 -MCALL. .EQUIV REMOVE FOR PDP-10 
1610 -TITLE CKFPCCO FP11F FLTG PNT PRT C 


:*COPYRIGHT (C) 1981 
7*DIGITAL EQUIPMENT CORP. 
7 *MAYNARD, MASS. 01754 


** 
. 


STHIS PROGRAM WAS ASSEMBLED age i, PDP=11 MAINDEC SYSMAC 
gar RAE (MAINDEC-11-DZQAC-C5), 1981. 


000001 $1 N=1 
411 160000 $SWR=160000 z¢HALT ON ERROR, LOOP ON TEST, INHIBIT ERROR TYPOUT 
1612 
1613 000244 FPVECT=244 
1614 000250 MMVECT=250 
1615 177400 $SWR=177400 
1616 00C200 $SWRMSK=200 
1617 600011 TAB=11 
Me be 000015 CRLF=15 
1620 -SBTTL BASIC DEFINITIONS 
z*INITIAL ADDRESS OF THE STACK POINTER *** 1100 *** 
001100 STACK= 1100 
104000 ERROR=EMT 
000004 SCOPE =I0T 
3 *MISCELLANEOUS DEF INI TIONS 
000011 HT= 11 ++ CODE FOR HORIZONTAL TAB 
000012 LF= 12 ;CODE FOR LINE FEED 
000015 CR= 15 >:CODE FOR CARRIAGE RETURN 
000200 CRLF= 200 >;CODE FOR CARRIAGE RETURN-LINE FEED 
177776 PS= 177776 3sPROCESSOR STATUS WORD 
177776 PSW=PS 
177774 STKLMT= 177774 3:STACK LIMIT REGISTER 
177772 PIRQ= 177772 7 zPROGRAM INTERRUPT REQUEST REGISTER 
177570 DSWR= fk da ete ete SWITCH REGISTER 
177570 DDISP= 177570 ARDWARE DISPLAY REGISTER 
Oe GENERAL PURPOSE REGISTER ie iaet 
000000 RO= 20 7;GENERAL REGISTER 
000001 R1= “1 : CENERAL REGISTER 
000002 R2= Ke 3;GENERAL REGISTER 
000003 R3= 43 ;;GENERAL REGISTER 
000004 R4= %4 ;;GENERAL REGISTER 
000005 R5= “5 ;;GENERAL REGISTER 
000006 R6= 26 : GENERAL REGISTER 
000007 R7= 47 GENERAL REGISTER 
000006 SP= 26 : STACK POINTER 
000007 PC= %7 PROGRAM COUNTER 
;*PRIORITY LEVEL DEFINITIONS 
PRO= 0 7;PRIORITY LEVEL 0 
000040 PR1= 40 ; 7:PRIORITY LEVEL 1 
000100 PR2= 100 :zPRIORITY LEVEL 2 
000140 PR3= 140 PRIORITY LEVEL 3 
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000200 


t 2 
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szPRIORITY LEVEL 
s PRIORITY LEVEL 
::PRIORITY LEVEL 

:PRIORITY LEVEL 


340 3 
ee tome SWITCH DEFINITIONS 


W 
BiT DEFINITIONS (BITOO TO BIT?5) 
100000 


PR4= 200 

PRS= 240 

PR6= 300 

PR7= 

Sw15= 1000 

Sw14= 40000 

Sw1i3= 20000 

Swi2= 10000 

Swi1= 4000 

Sw10= 2000 

Swo9= 1000 

SwO8= 400 

SwO7= 200 

Swo6= 100 

SwOS= 40 

SwO4= 20 

SwO3= 10 

SwO2= 4 

Swol= 2 

Sswoo= 1 
SW9=SwO09 
SW8=Sw08 
SW7=Sw07 
SW6=SW06 
Sw5=Sw05 
SW4=SW04 
Sw3=Sw03 
SW2=SwW02 
SW1=Sw01 
Sw0=Sw00 

:*DATA 

BIT15= 00 

B!IT14= 40000 

BIT13= 20000 

BIT12= 10000 

BIT11= 4000 

BIT10= 2000 

BITO9= 1000 

BITO8= 400 

BIT07= 200 

BITO6= 100 

BITOS= 40 

BITO4= 20 

BITO3= 10 

BITO2= 4 

BITO1= 2 

BITOO= 1 
BIT9=BITO9 
BIT8=B1T08 
BIT7=BITO7 
BI T6=B1 T06 
BIT5=BIT05 
BIT4=BIT04 
BIT3=BITO3 
BIT2=BIT02 
BIT1=B]T01 


NIAWS 


SEQUENCE 
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CKFPCCO FRIIF FLTG PNT PRT C 


BASIC DEFINITIONS 


000001 
000004 
000010 
000014 
000014 
000014 
000020 
000024 
000030 
000034 
00006 
000064 
| 000240 
1621 
| 1622 000000 
1623 000001 
1624 000002 
1625 000003 
1626 000004 
1627 000005 
1628 000 
1629 000007 
1630 172300 
1631 172302 
1632 172304 
1633 172306 
1634 172310 
1635 172316 
1636 172340 
1637 172342 
1638 172344 
1639 172346 
1640 172350 
1641 172356 
1642 172320 
1643 172322 
1644 172324 
1645 172326 
1646 172330 
1647 172336 
1648 172360 
1649 172362 
1650 172364 
1651 172366 
1652 172370 
1653 172376 
1654 177572 
1655 177574 
1656 177576 
1657 172516 
1658 117760 
1659 000020 
1660 
1662 
1663 


000000 


TRAPVE C= 
TKVEC= 
TPVEC= 
PIRQVEC 


DATA 
IOTRAP 


- SBTTL 





34 
60 
64 


=240 
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T T00 
Pu'' TRAP VECTOR rte oe hy 


3: TIME OUT AND OTHER ERRORS 
err AND ILLEGAL INSTRUCTIONS 


; TRACE TRAP 
> BREAKPOINT TRAP (BPT) 
<INPUT /OUTPUT TRAP (IOT) **SCOPE** 
;;POWER FAIL 
ey ae TRAP (EMT) **ERROR** 
;""TRAP'' TRAP 


:TTY KEYBOARD VECTOR 
TTY PRINTER VECTOR 
ROGRAM INTERRUPT REQUEST VECTOR 


~SBTTL FPP REGISTER DEF INI TIONS 


tt PLDT TL FE FRLTLT- 
NN NN NO UES WI AO 


ey ayy Pi a ay ny Pay iy 
W 
Ww 
oO 


Hueneme te ih th th te th tk ihe 


OP PS SR RB RS SB RS PB PV DB BH SV SS SO SO 


H 2 
/CKFPCCO FPI1F FLTG PNT PRT C MACRO M1113 09=APR=81 13:53 PAGE 7-3 SEQUENCE 20 
TRAP CATCHER 


| ‘ ' 
y*ALL UNUSED LOCATIONS FROM 4 = 776 CONTAIN +e en PG a a - an 
>*SEQUENCE TO CATCH ILLEGAL TRAPS AND INTERRUP TS ~ 3 
900176 LOCATION, Q CONTAINS 0 TO CATCH IMPROPERLY LOADED VECTORS 4 
4 << 
: 000174 000000 DISPREG: .WORD 0Q 32 SOFTWARE DISPLAY REGISTER 
000176 000000 SWREG: “WORD 0 32 SOFTWARE SWITCH REGISTER 
| -SBTTL STARTING my et gen 
000200 000137 006116 JMP @4START ;; JUMP TO STARTING ADDRESS OF PROGRAM 


-— —--------- + 


c----— _ — — 


- 


I 2 
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1664 .SBTTL COMMON TAGS 
DIDO IRISISIIIOIIIOIIISIOISIIISISIIIIIIISIIOISIUIOOIUOUIUIUUIDIOUIDIIDIUDOD IO rina nts 
3*THIS TABLE CONTAINS VARIOUS COMMON STORAGE LOCATIONS 
;*USED IN THE PROGRAM. 


001100 .=1100 
001100 $CMTAG: :;START OF COMMON TAGS 
001100 .WORD 0 
001102 000 $TSTNM: .BYTE 0 :: CONTAINS THE TEST NUMBER 
| 001103 000 SERFLG: .BYTE 0 3iCONTAINS ERROR F 
001104 000000 $ICNT: .WORD 0 * = CONTAINS SUBTEST ITERATION COUNT 
001106 0 $LPADR: .WORD 0 *: CONTAINS SCOPE LOOP ADDRESS 
001110 $LPERR: .WORD 0 s CONTAINS SCOPE RETURN FOR ERRORS 
001112 000000 SERTTL: .WORD 0 >: CONTAINS TOTAL ERRORS DETECTED 
001114 000 $ITEMB: .BYTE 0 *= CONTAINS ITEM CONTROL BYTE 
001115 001 $ERMAX: .BYTE 1 SS CONTAINS MAX. ERRORS PER TEST 
| 001116 000000 $ERRPC: .WORD 0 ‘CONTAINS PC OF LAST ERROR INSTRUCTION 
001120 0 $GDADR: .WORD 0 : CONTAINS ADDRESS OF ‘GOOD’ DATA 
001122 000000 $BDADR: .WORD 0 : CONTAINS ADDRESS OF ‘BAD' DATA 
001124 000 $GDDAT: .WORD 0 *: CONTAINS 'GOOD' DATA 
001126 0000 $BDDAT: .WORD 0 4S SO SENVED "BAD' DATA 
| 001130 000000 “WORD 0 SRESERVED=-NOT TO BE USED 
061132 000 “WORD 0 
001134 000 $AUTOB: .BYTE 0 : AUTOMATIC MODE INDICATOR 
001135 000 $INTAG: .BYTE 0 :, INTERRUPT MODE INDICATOR 
001136 000000 “wORD 0 
001140 177570 WORD DSWR : ADDRESS OF SWITCH REGISTER 
001142 177570 DISPLAY: .WORD DDISP ::ADDRESS OF DISPLAY REGISTER 
001144 177560 $TKS: 177560 t= TTY KBD STATUS 
001146 177562 $TKB: 177562 S:TTY KBD BUFFER 
001150 177564 $TPS: 177564 *: TTY PRINTER STATUS REG. ADDRESS 
001152 177566 $TPB: 177566 ‘:TTY PRINTER BUFFER REG. ADDRESS 
001154 000 $NULL: .BYTE 0 ‘CONTAINS NULL CHARACTER FOR FILLS 
601155 002 $FILLS: .BYTE 2 SICONTAINS # OF FILLER CHARACTERS REQUIRED 
001156 012 $FILLC BYTE 12 zz INSERT FILL CHARS. AFTER A ‘LINE FEED’ 
001157 000 $TPFLG: .BYTE 0 "TERMINAL AVAILABLE'’ FLAG (BIT<07>=0=YES) 
001160 000000 $REGAD: .WORD 0 ‘CONTAINS THE ADDRESS FROM 
, Si:WHICH ($REGO) WAS OBTAINED 
000024 .REPT  $CM3 
001162 000000 $REGO: :WORD 0 :: CONTAINS (($REGAD) +0) 
001164 00 $REG]: .WORD 0 ‘CONTAINS (($REGAD) +2) 
001166 000000 $REG2: .WORD 0 S CONTAINS (($REGAD) +4) 
001170 $REG3: .WORD 0 ‘CONTAINS (($REGAD) +6) 
001172 000000 $REG4: .WORD 0 CONTAINS (($REGAD) +10) 
001174 $REGS: .WORD 0 *: CONTAINS (($REGAD) +12) 
001176 000000 $REG6: .WORD 0 SZCONTAINS (($REGAD) +14) 
001200 $REG7: . WORD 0 SCONTAINS (($REGAD)+16) 
001202 $REG10O: .WORD 0 CONTAINS (($REGAD) +20) 
001204 000000 $REG11: .WORD 0 CONTAINS (($REGAD) +22) 
206 000000 $REGI2: .WORD 0 S CONTAINS (($REGAD) +24) 
001210 000000 $REG13: .WORD 0 TI CONTAINS (($REGAD) +26) 
001212 000000 $REGI4: .WORD 0 SZ CONTAINS (($REGAD) +30) 
001214 000000 $REG15: .WORD 0 S CONTAINS (($REGAD) +32) 
001216 000000 $REGI6: .WORD 0 SZCONTAINS (($REGAD) +34) 
001220 000000 $REGI7: .WORD 0 SZ CONTAINS (($REGAD) +36) 
001222 000000 $REG20: .wWORD 0 | SSCONTAINS (($REGAD) +40) 
001224 000000 $REG21: .WORD 0 =: CONTAINS (($REGAD) +42) 
001226 000000 $REG22: .WORD 0 SCONTAINS (($REGAD) +44) 


| 
| 
| 
| 
| 
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C 
| 001230 
001232 

00 


—CKFPCCO FRIIF FLTG PNT PRT C 
OMMON TAGS 


377 


000 
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377 


eRe RRRRRERREREERERERERERRERRRREEREREERERRERRER EERE RRR REE EEE 


lelelelelealsilelelelelelelelelelelelelclomg@) 


<207><377><377> 33 :: 


<15> 
<12> 


»SBTTL APT MAILBOX~E TABLE 


MARA AASAASASAASAALALSARRRRARRRR RRR RR RRS RR RR ERR RRR RRR RR RARER ES ES DI 


$REG23: .WORD 
REPT 4 
$TM°0 . WORD 
$TMP1 ~WORD 
$TMP2 ~WORD 
$TMP3: WORD 
$TMP4: . WORD 
$TMP5:  .WORD 
$TMP6: .WORD 
$TMP7:  .WORD 
$TMP10: .WORD 
$TMP11: .WORD 
$TMP12: .WORD 
$TMP13: .WORD 
$TMP14: WORD 
$TMP15: .WORD 
$TMP16: .WORD 
$™P17: WORD 
$TMP20: .WORD 
$TMP21: .WORD 
$TMP22: .WORD 
$TMP23: .WORD 
$TIMES: 
$ESCAPE :0 

Fils ,ASCIZ 
$QUES ASCII 
$CRLF ASCII 
SLF: ASCIZ 

* EVEN 
$MAIL: 
$MSGTY: .WORD 
$FATAL: .WORD 
$STESTN: .WORD 

ASS: .WORD 
$SDEVCT: .WORD 
$UNIT: WORD 
$MSGAD: .WORD 
SMSGLG: .WORD 
SETABLE: 

ENV: BYTE 
SENVM: .BYTE 
$SWREG: .WORD 
$USWR: WORD 
$CPUOP: .WORD 
** 

7* 
on 
$MAMS1: .BYTE 
$MTYP1: BYTE 


33CONTAINS (($REGAD) +46) 


; USER DEFINED 
: USER DEFINED 
; USER DEFINED 
;;USER DEFINED 
; USER DEFINED 
: USER DEFINED 
;7USER DEFINED 
; USER DEFINED 
; USER DEFINED 
s USER DEFINED 
; USER DEFINED 
; USER DEFINED 
3 USER DEFINED 
7 7USER DEFINED 
7 USER DEFINED 
; USER DEFINED 
: USER DEFINED 
; USER DEFINED 
3 ;USER DEFINED 
fi DEF INED 


; «MAX. NUMBER OF ITERATIONS 
SCAPE ON ERROR ADDRESS 


[CODE FOR BELL 
QUESTION MARK 


: {CARRIAGE RETURN 
FEED 


sLINE 


2 APT MAI. BOX 
sMESSAGE TYPE CODE 
: 7 FATAL ERROR NUMBER 


ZIMESSAGE ADDRESS 
3 =MESSAGE LENGTH 
3: APT ree ine 


VIR NT MODE BITS 
tTAPT SWITCH REGISTER 


2 sUSER SWITCHES 
PU TYPE, th B 


iC 
BITS 15- Dy 


“4 —4 =9 


11/70=06, 1 the 


YTE 
900 NSEC “CORE “O01 


CK 
=FLOATING POINT PROCESSOR 
8=MEMORY MANAGEMENT 
;HIGH ADDRESS.M.S. BYTE 
: MEM, TYPE -BLKAT 


GH BYTE) 


SEQUENCE 


CPU_TYPE 
11/04=01,11/05=02, ao 31/208 =03,11/40=04,11/45=05 
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CKFPCCO FRIIF FLTG PNT PRT C 
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001350 
001352 


cs 
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SETEND: 


ADDW15 


7 MEM. TYPE ,BLK&2 
> ;MEM.LAST ADDRESS,BLKA#2 
3;HIGH ADDRESS,M.S.BYTE 

+: MEM. TYPE ,BLKA3 
7:MEM.LAST ADDRESS ,BLK43 
;zHIGH ADDRESS,M.S.BYTE 

> MEM. TYPE ,BLKA4 
;;MEM.LAST ADDRESS,BLK&4 


3; INTERRUPT VECTORA1,BUS PRIORITYA1 
3; INTERRUPT VECTOR#2BUS PRIORITY#2 
;;BASE ADDRESS OF EQUIPMENT waa" TEST 


DEVICE MAP 


;;CONTROLLER DESCRIPTION WORDA1 
:: CONTROLLER DESCRIPTION WORDA&2 
CE DESCRIP 


7 DEVICE 
7 DEVICE 


300 NSEC BIPOLAR=002 
500 NSEC MOS=003 

3;HIGH ADDRESS ,BLKA#1 
MEM.LAST ADDR. =3 .=3 hy fit © THIS WORD AND LOW OF ‘'TYPE’’ ABOVE 


TOR WORDAO 


DESCRIPTOR 
DESCRIPTOR 
DESCRIPTOR 
DESCRIPTOR 
DESCRIPTOR 
DESCRIPTOR 
DESCRIPTOR 
DESCRIPTOR 
DESCRIPTOR 
DESCRIPTOR 
DESCRIPTOR 
DESCRIPTOR 
DESCRIPTOR 
DESCRIPTOR 
DESCRIPTOR 


WORD415 


SEQUENCE 
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| ERROR POINTER TABLE 


.SBTTL ERROR POINTER TABLE 

3*THIS TABLE CONTAINS THE INFORMATION FOR EACH ERROR THAT CAN OCCUR. 

>*THE INFORMATION IS OBTAINED BY USING THE INDEX NUMBER FOUND IN 

*LOCATION SITEMB. THIS NUMBER INDICATES WHICH ITEM IN THE hay 0 , PERTINENT. 


‘ *NOTE1: IF $ITEMB IS 0 THE ONLY PERTINENT DATA IS ($ERRP 
S*NOTE2: EACH ITEM IN THE TABLE CONTAINS 4 POINTERS SEPLAIED AS FOLLOWS: 
se EM POINTS TO THc ERROR MESSAGE 
sf DH : {POINTS TO THE DATA HEADER 
:* DT ; POINTS TO THE DATA 
;* DF ;z;POINTS TO THE DATA FORMAT 
001442 $SERRTB: 
1668 000444 .REPT | MNUMBER 
1670 001442 047662 066370 070212 “WORD EM1,DH1,DT1,DF1 =: ITEM 1 
001452 047736 066460 070232 ~ WORD EM2,DH2,DT2,DF 2 s ITEM 2 
001462 047766 066524 070254 “WORD EM3.DH3.DT3,DF3.—-: ITEM 3 
001472 050016 066570 070276 "WORD EM4.DH4.DTG.DF4 =: ITEM 
001502 050077 066633 070320 "WORD EMS.DHS.DTS.DF5 —s- : ITEM 5 
001512 050110 066633 070346 “WORD EM6.DH6.DT6.DF6 =: ITEM 6 
001522 050253 066570 070276 “WORD E—M7.DH7.DT7.DF7?.—s: ITEM 7 
001532 050275 066633 070320 "WORD EM10,DHi0,DT10,DF10. ITEM 10 
001542 050310 070276 "WORD €M11.DH11.DT11.DF11.—s : ITEM 11 
001552 050340 066633 070320 "WORD €M12.DH12.DT12.DF12. - :iTEM 12 
001562 050352 066644 070346 "WORD £M13.DH13.D113.DF13. ss ITEM 13 
001572 050352 4 070346 "WORD £M14.DH14.DT14.DF14 ITEM 14 
001602 0504 070320 "WORD €M15.DH15.DT15.DF15. ss ITEM 15 
001612 050432 066704 070360 “WORD £M16.DH16.DT16.DF16 =: ITEM 16 
001622 050456 066644 070346 “WORD £€M17.DH17.DT17.DF17.—s : ITEM 17 
001632 050502 070360 "WORD  £M20.DH20.DT20.DF20 ITEM 20 
050520 33 070320 "WORD EM21.DH21.DT21.DF21 = : ITEM 21 
001652 050520 066633 070320 “WORD EM22.DH22.DT22.DF22 =: ITEM 22 
001662 050532 070346 “WORD £M23.DH23.DT23.DF23 ss : ITEM 23 
001672 050557 066570 070360 "WORD £EM24.DH24.DT24.DF24 ITEM 24 
001702 050574 066633 070320 WORD EM25.DH25.DT25.DF25 ITEM 25 
001712 O 070346 - WORD EM26,DH26,DT26,DF 26 sITEM 26 
001722 050633 066570 070360 “WORD EM27.DH27.DT27.DF27 ss : ITEM 27 
001732 050650 066633 070320 "WORD £M30.DH30.DT30.DF30 ITEM 30 
001742 070346 “WORD £M31.DH31.DT31.DF 31 SITEM 31 
001752 050706 066570 070360 “WORD £&M32.DH32.DT32.DF32. ss: ITEM 32 
001762 050724 066633 070320 ‘WORD E H33.D133,DF33 =: ITEM 32 
001772 36 070346 .~ WORD EM34,.DH34,D134,DF 34 ZITEM 34 
050763 066570 070360 "WORD  £M35.DH35.DT35.DF 35 : ITEM 35 
002012 33 070320 "WORD £M36.DH36.DT36.DF36 =: ITEM 36 
002022 051012 066747 070402 "WORD £M37.DH37.DT37.DF37. ss: ITEM 37 
002032 051072 070402 "WORD £M40.DH40.DT40.DF40 ITEM 40 
051072 067012 070446 "WORD £M41.DH41.D141.DF41 ITEM 41 
002052 051012 066747 070402 "WORD EM42.DH42.DT42.DF42 ss S ITEM 42 
051072 066747 070402 "WORD £M43.DHG3.DT43.DF43. =: ITEM 43 
002072 051012 066747 070402 "WORD £M44.DH44.DT44.DF44 ITEM 44 
002102 051012 066747 070402 "WORD £EM45.DH45.DT45.DF45  — : ITEM 45 
002112 051072 066747 070402 "WORD £M46.DH46.DT46.DF46 =: ITEM 46 
002122 051012 066747 070402 “WORD EM47.DH47 F427 =: ITEM 47 
002132 051012 066747 070402 "WORD £MSO.DHSO.DTS0.DF50 ITEM 50 
002142 051551 066747 070402 “WORD £M51.DH51.D1T51.DF51 = : ITEM 51 
002152 051610 066747 070402 WORD £EMS2.DH52.D152.DF52 ITEM 52 
2162 051610 067012 070446 "WORD £MS53.DH53.DT53.DF53—s : ITEM 53 
002172 051551 066747 070402 "WORD £M54°DH54_DT54.DF54 =: ITEM 54 
| 002202 051551 066747 070402 "WORD EMS55‘DH55.DT55.DF55 —s- : ITEM 55 


| mM 2 
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002212 051610 066747 070402 -WORD &M56,DH56,D156,DF56 ; ITEM 56 


002222 051610 066747 070402 -WORD EM57,DH57,D157,DF57 ZITEM 57 
002232 051551 066747 070402 -WORD EM60,DH60,DT60,DF 60 :1TEM 60 
| 002242 051610 066747 070402 -WORD €&M61,DH61,D161,DF61 sITEM 61 
002252 052305 0 3460 070360 «WORD EM62,DH62,DT62,DF62 ITEM 62 
002262 052403 066524 070360 -WORD EM63,DH63,DT63,DF63 sITEM 63 
002272 052420 066633 070320 «WORD EM64,DH64,D164,DF64 :1TEM 64 
052470 066460 070360 -WORD EM65,DH65,DT65,DF65 s1TEM 65 
002312 052514 066570 070276 -WORD EM66,DH66,D1T66,DF 66 ITEM 66 
002322 052542 066460 070276 -WORD &EM67,DH67,D167,DF67 s1TEM 67 
| 002332 052624 066524 070276 -WORD £&M70,DH70,DT70,DF 70 ;1TEM 70 
052647 066633 070522 «WORD €M71,DH71,D1T71,DF71 7ITEM 71 
002352 066460 070276 «WORD &M72,DH72,DT72,DF72 sITEM 72 
002362 052700 066633 070556 -WORD &M73,DH73,D173,DF73 sITEM 73 
002372 052714 066570 070276 «WORD £&M74,DH74,D1T74,DF74 Z1TEM 74 
002402 052730 066460 070232 «WORD €&M75,DH75,D175,DF75 ITEM 75 
002412 052744 44 070346 -WORD £&M76,DH76,DT76,DF76 ITEM 76 
002422 053017 33 070556 -WORD &M77,DH77,D177,DF77 ITEM 77 

002432 053032 066570 070276 “WORD £M100,DH100,DT100.DF 100 7; 1TEM 100 

002442 053046 066460 070232 «WORD €&M101,DH101,D1T101,DF101 ITEM 101 

002452 06 4 070346 -WORD &M102,DH102,D1T102,DF 102 ;1TEM 102 

002462 053105 066633 070556 «WORD &M103,DH103,DT103,DF 103 ITEM 103 

002472 053120 066570 070276 «WORD &M104,DH104,DT104,DF 104 ITEM 104 

002502 053134 066460 070232 «WORD £M105,DH105,DT105,DF105 3: 1TEM 105 

002512 053150 066644 070346 -WORD &M106,DH106,DT106,DF 106 ;1TEM 106 

002522 053!74 066644 070346 -WORD &M107,DH107,DT107,DF 107 7 1TEM 107 

002532 053210 066633 070556 «WORD £&M110,DH110,DT110,DF110 7; 1TEM 110 

002542 053224 066570 070276 WORD €&M111,DH111,DT111,DF111 7 ITEM 111 

002552 053240 066460 070232 WORD &M112,DH112,DT112,DF112 ITEM 112 

053254 066644 070346 WORD M113,DH113,D1113,DF113 ITEM 113 

002572 053300 066633 070556 «WORD £&M114,DH114,DT114,DF114 7 ITEM 114 

002602 053314 066570 070276 WORD €M115,DH115,DT115,DF115 ITEM 115 

002612 053330 066460 070232 WORD €M116,DH116,DT116,DF116 :1TEM 116 

002622 344 066644 070346 - WORD 17,DH117,DT117,DF 117 ITEM 117 

053367 33 070556 -WORD £&M120,DH120,DT120,DF120 7 1TEM 120 

642 053402 066570 070276 «WORD £&M121,DH121,DT121,DF 121 s ITEM 121 

002652 053416 070232 «WORD EM122,DH122,DT122,DF122 ITEM 122 

2662 053432 4 070346 «WORD £M123,DH123,DT123,DF123 ITEM 123 

002672 053456 066633 070556 «WORD = EM124,DH124,DT124.DF 124 ITEM 124 

002702 053472 066570 070276 WORD &M125,DH125,DT125.DF125 ITEM 125 

002712 053506 066460 070232 -WORD £M126,DH126,DT126,DF 126 ITEM 126 

002722 053522 066644 070346 «WORD EM127,DH127,DT127,DF 127 ITEM 127 

002732 053546 066633 070556 «WORD £M130,DH130,DT130,DF 130 ITEM 130 

002742 053562 066460 070232 «WORD €M131,DH131,D1T131,DF 131 ITEM 131 

002752 053576 066644 070346 -WORD £M132,DH132,DT132.DF 132 ITEM 132 

002762 36 066633 070556 «WORD £M133,DH135,DT133,DF 133 ITEM 133 

002772 60 070232 «WORD £M134,DH134,D1T134,DF 134 ITEM 134 

2 36 066633 070320 «WORD £M135,DH135,D1T155,DF 135 ITEM 135 

003012 053722 066633 070320 - WORD M136,DH136,DT136,DF 136 ITEM 136 

003022 36 066460 070360 «WORD &M137,DH137,D1137,DF 137 ITEM 137 

003032 053752 33 070320 WORD £&M140,DH140,DT140,DF 140 ITEM 140 

2 066570 070276 «WORD £€M141,DH141,DT141,DF 141 ITEM 141 

003052 054024 070276 -WORD £M142,DH1 ger og «DE eG ITEM 142 

003 040 066633 070320 «WORD £M143,DH145,DT143,DF 145 ITEM 143 

0030 054054 066570 070276 «WORD £M144,DH144,D1T144,DF 144 ITEM 144 

003102 054072 066460 070276 «WORD £&M145,DH145,D1T145,DF 145 ITEM 145 

003112 054106 066633 070320 -WORD £M146,DH146,DT146,DF 146 ciTEM 146 


| 
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a POINTER TABLE 
003122 054122 066570 070276 WORD EM147.DH147,D1147,DF1467 ss ITEM 147 
003132 054142 066460 070276 "WORD £M150.DH150.DT150.DF150  : ITEM 750 
| 003142 054156 070320 EM151.DH151.DT151.DF151 ITEM 151 
003152 054172 066570 070276 WORD EM152°DH152.DT152-DF152. STEM 152 
| 003162 054212 460 070276 WORD €M153.DH153.DT153.DF153  : ITEM 153 
003172 054226 066633 070320 WORD €M154°DH154.DT154.DF154  : ITEM 154 
003202 054242 070276 WORD EM155:DH155.DT155.DF155 ITEM 755 
003212 054262 066460 070276 WORD £M156°DH156.DT156.DF156 ss ITEM 156 
003222 054276 3 070320 WORD £M157.DH157.DT157.DF157.: ITEM 157 
003232 054321 066570 070276 WORD  £M160.DH160.DT160.DF160  : ITEM 160 
003242 054367 066460 070276 WORD €M161.DH161.DT161.DF161 : ITEM 161 
003252 054402 066633 070320 "WORD EM162-DH162.DT162.DF162. : ITEM 162 
003262 054426 066460 070276 “WORD £M163.DH163.DT163.DF163  : ITEM 163 
003272 054442 066704 070276 “WORD £M164.DH164_DT164.DF164 : ITEM 164 
003302 054472 066747 070402 "WORD EM165.DH165.DT165.DF165 : ITEM 165 
003312 054506 066747 070402 “WORD EM166.DH166.DT166,DF166. ITEM 166 
003322 054522 066747 070402 "WORD EM167.DH167.DT167.DF 167: ITEM 167 
003332 054536 066747 070402 “WORD £M170°DH170.DT170.DF170 : ITEM 170 
003342 054552 066747 070402 “WORD EM171.DH171.DT171.DF171 ITEM 171 
0C3352 054566 066747 070402 "WORD £M172.DH172.D1172.DF172. -: ITEM 172 
003362 054602 067012 070446 - “WORD EM173.DH173.D1173,DF173. ss ITEM 173 
003372 054616 067012 070446 "WORD £M174.DH174.D1174.DF174. : ITEM 174 
003402 054632 067012 070446 - WORD EM175,DH175,D1T175,DF175 ; ITEM 175 
003412 054646 066460 070276 "WORD -£M176.DH176.DT176.DF176 : ITEM 176 
003422 054670 070512 “WORD EM177.DH177.DT177.DF177,—s : ITEM 177 
003432 054724 066747 070402 “WORD EM200°DH200.DT200.DF200 —: ITEM 200 
003442 054777 066747 070402 “WORD EM201DH201_DT201_DF201 —: ITEM 201 
003452 055050 066747 070402 "WORD  EM202°DH202-DT202.DF202  : ITEM 202 
003462 055122 066747 070402 "WORD EM203.DH203.DT203,DF203 : ITEM 203 
003472 055244 066747 070402 "WORD EM204-DH204_DT204_.DF204 : ITEM 204 
003502 055317 066747 070402 WORD  EM205.DH205.DT205.DF205 — : ITEM 205 
003512 055370 066747 070402 WORD  £M206.DH206.DT206.DF 206  : ITEM 206 
003522 055442 066747 070402 WORD  EM207.DH207.DT207_DF207 —s: ITEM 207 
003532 055514 066747 070402 WORD  £—M210°DH210.DT210.DF210 ITEM 210 
003542 066747 070402 ~ WORD EM211,DH T211,DF211 s ITEM 211 
003552 055645 066747 070402 WORD £M212°DH212.DT212.DF212  : ITEM 212 
003562 055716 066747 070402 WORD £M213.DH213.DT213,DF213 =: ITEM 213 
066747 070402 ~WORD EM214,DH214,DT214,DF214 ZITEM 214 
2 056114 066704 070276 WORD EM215.DH215.DT215.DF215: ITEM 215 
003612 056251 066633 070320 WORD EM216-DH216.DT216.DF216 ss: ITEM 216 
003622 056264 066570 070276 "WORD EM217.DH217.DT217.DF217—s : ITEM 217 
003632 056304 066460 070276 "WORD  £M220°DH220°DT220-DF220 —: ITEM 220 
003642 056320 066704 070276 "WORD -£M221/DH221.DT221.DF221— : ITEM 221 
003652 056370 33 070320 “WORD  EM222°DH222.DT202.DF202 ITEM 222 
> 056404 066570 070276 "WORD £M223.DH223,DT223,DF223 ss : ITEM 223 
056424 60 070276 "WORD EM224.DH224.D1224.DF224  : ITEM 224 
003702 056440 066570 070276 "WORD EM225-DH225.DT225.DF225 : ITEM 225 
003712 056463 070276 "WORD £M226°DH226.DT226.DF226 ss ITEM 226 
| 003722 056474 067112 070346 "WORD £€M227.DH227.DT227.DF22? ss: ITEM 227 
003732 056525 070276 “WORD  £M230;DH230.DT230.DF230 ITEM 230 
| 003742 056550 070276 "WORD M231 .DH231.DT231 .DF23 ITEM 231 
003752 056562 067112 070346 "WORD EM232-DH232.D1232.DF232 =: ITEM 232 
003762 056574 066570 070276 "WORD £M233.DH233.DT233.DF233 = : ITEM 233 
003772 056620 066460 070276 “WORD €M234.DH234.DT234.DF234 0: ITEM 234 
004002 056632 067112 070346 "WORD EM235-DH235.D1235.DF235 : ITEM 235 
| 004012 056644 066570 070276 "WORD EM236.DH236.D1236.DF236 0: ITEM 236 
004022 056671 066460 070276 "WORD EM237-DH237_DT237_DF237 0: ITEM 237 


—— T= = 
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ERROR POINTER TABLE 
004032 056702 
00404 


2 

i] 

x 
™m — st 
Nm oO mo 

~m 

Oo 

Vi 

N 

— 

VW 

oO 


004732 062202 





067112 
70 


066747 
066747 
066747 


070346 


EM240,DH240,D1240,DF 240 


EM245 ,DH245 ,DT245,DF 245 
EM246 ,DH246,D1246,DF 240 
EM247 ,DH247,D1247,DF 247 
EM250,DH250,DT250,DF 250 
EM251,DH251,DT251,DF 251 


EM260,DH260 ,DT260,DF 260 
EM261,DH261,DT261,DF 261 
=M262 .DH262 .DT 262. DF 262 
EM263,0H263 ,DT263,DF 263 
EM264 ,DH264 ,DT264,DF 264 
E265 ,DH265 ,DT265 ,DF 265 


EM271,DH271,DT271,DF271 
EM272,DH272.DT272,DF272 
EM273 ,DH273,DT273,DF 273 
EM274 ,DH274 ,DT274,DF 274 


24, 
EM325 .DH325.D1325.D 
EM326 , DH326.DT 326.) 
EM327,DH3527,D1327,D 
EM330,DH3350,D13350.D 


;1TEM 240 


. a . . . . . . . . . . . 
_ eed 
4 “4 
mn mm 
= 
nm 
> 
N 


. 

— 

— 

m 

= 
WANWWNWNWNWNNWNWNWW 
non eS e  O e 
NM HONAUFWR OO 


™m 


-——-~ 
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(ERROR POINTER TABLE 
004742 062256 066747 070736 .WORD £M331,DH331,D1331,DF 331 SITEM 331 
| 004752 062326 066747 070736 "WORD £&M332.DH332.DT332.DF332 ITEM 332 
| > 004762 061762 066747 070736 "WORD £M333.DH333,D1333,DF333 :ITEM 333 
004772 062424 066747 070736 "WORD &M334.DH334.D1334.DF 334 :ITEM 334 
005002 062507 066747 070736 WORD £M335.DH335.D1T335.DF 335  : ITEM 335 
005012 062556 066747 070736 WORD £M336.DH336.D1T336.DF 336  :ITEM 336 
005022 062613 066747 070736 “WORD £M337.DH337.D1337,DF 33”  :ITEM 337 
005032 062667 066747 070736 "WORD &M340.DH340.DT340.DF340 ITEM 340 
005042 062736 066747 070736 "WORD EM341.DH341.DT341.DF341 ITEM 341 
005052 063006 066747 070736 "WORD EM342.DH342.DT342.DF 342  :ITEM 342 
005062 063056 066747 070736 "WORD £M343.DH343.DT343,.DF343 ITEM 343 
| 005072 063133 066747 070736 "WORD £M344.DH344_.DT344.DF 344 : ITEM 344 
| 005102 063240 066747 070736 "WORD E£M345.DH345.DT345.DF345 ITEM 345 
005112 063310 066747 070736 "WORD £M346.DH346.DT346.DF346 =: ITEM 346 
005122 063407 066747 070736 "WORD £M347.DH347.D1347.DF 347 ITEM 347 
| 005132 063433 066747 070736 "WORD £M350.DH350.DT350.DF350  :ITEM 350 
005142 063444 066644 070346 "WORD  EM351.DH351.DT351.DF351 =: ITEM 351 
005152 063546 066747 070736 "WORD  EM352.DH352.DT352.DF 352. =: ITEM 352 
005162 063616 066747 070736 "WORD €M353.DH353.DT353.DF353 :ITEM 353 
005172 063666 066747 070736 "WORD £M354.DH354.DT354.DF 354 :ITEM 354 
005202 063736 066747 070736 "WORD £M355.DH355.DT355.DF355 ITEM 355 
005212 064006 066570 070232 "WORD £M356.DH356.DT356.DF356 = : ITEM 356 
005222 064112 067132 070254 "WORD EM357.DH357.DT357.DF 357: ITEM 357 
| 00 064146 066644 070346 “WORD &M360.DH360.DT360.DF360  :ITEM 360 
005242 064236 06 070612 "WORD £M361.DH361.D7361.DF361 : ITEM 361 
005252 064254 067176 071046 "WORD £M362.DH362.DT362.DF362  :ITEM 362 
005262 064364 067220 071064 "WORD £M363.DH363,DT363.DF 363 =: ITEM 363 
005272 064432 067260 071106 "WORD £EM364.DH364.DT364.DF 364 ITEM 364 
005302 064532 067327 070346 "WORD £M365.DH365.DT365.DF 365 :ITEM 365 
005312 064615 067340 071120 "WORD £M366.DH366.DT366.DF 366 =: ITEM 366 
005322 064700 067372 071166 "WORD EM367.DH367.DT367.DF 367. =: ITEM 367 
005332 064763 06 071212 “WORD £M370.DH370.DT370.DF370  :ITEM 370 
005342 000000 009000 000000 "WORD EM371.DH371.DT371 .DF 371 SITEM 371 
005352 000000 vv000 000000 "WORD £M372.DH372.DT372.DF 372. =: ITEM 372 
005362 000000 000000 000000 "WORD £M373.DH373.DT373,DF373  : ITEM 373 
005372 000000 000000 000000 “WORD £M374.DH374.D1T374.DF374 :ITEM 374 
095402 000000 000000 000000 "WORD EM375.DH375.DT375.DF375 =: ITEM 375 
005412 000000 000000 000000 “WORD £M376.DH376.DT376.DF 376 = : ITEM 376 
005422 000000 000000 000000 "WORD EM377.DH377.D1377.DF377—s: ITEM 377 
005432 000000 000000 000000 "WORD £M400.DH400.DT400.DF400 ITEM 400 
005442 065017 066570 070276 "WORD EM401.DH401.DT401 .DF401 S ITEM 401 
005452 065041 066460 070276 "WORD £EM402.DH402.DT402.DF402 :ITEM 402 
005462 065052 066644 070346 "WORD £M403.DH403.DT403.DF403 ITEM 403 
005472 065202 067112 070346 "WORD  £M404.DH404.DT404.DF404 ITEM 404 
005502 065214 066570 070276 “WORD EM405.DH405.DT405.DF405 =: ITEM 405 
005512 065230 066460 070276 “WORD £M406.DH406.DT406.DF406 ITEM 406 
005522 065244 066644 070346 "WORD £M407.DH407.DT407.DF407 ~—s: ITEM 407 
005532 065314 067112 070346 "WORD £M410.DH410.DT410.DF410 =: ITEM 410 
005542 065330 066570 070276 "WORD EM411.DH411.DT411_.DF411 ‘ITEM 411 
005552 065354 066460 070276 "WORD £M412.DH412.DT412.DF412 ITEM 412 
005562 44 070346 "WORD €M413.DH413.DT413.DF413 =: ITEM 413 
005572 065436 067112 070346 "WORD £M414.DH414.DT414.DF414 ITEM 414 
005602 065450 066570 070276 "WORD £M415.DH415.DT415.DF415 ITEM 415 
00 065475 460 070276 "WORD £M416.DH416.DT416.DF416 ITEM 416 
005622 065506 066644 070346 "WORD £M417.DH417.D1T417.DF417. ss: ITEM 417 
| 005632 065552 067112 070346 WORD £M420.DH420.DT420.DF420 =: ITEM 420 
005642 065564 066570 070276 WORD £M421.DH421_DT421.DF421 SITTEM 421 
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| ERROR PCINTER TABLE 
| 005652 065611 066460 070276 -WORD  E€M422,DH422,D1422,DF422 =; ITEM 422 
005662 065622 066644 070346 «WORD EM423,DH423,D1T423,DF423 =; ITEM 423 
005672 065634 067112 070346 «WORD EM424,DH424,DT424,DF424 =; ITEM 424 
005702 065646 066570 070276 «WORD  EM425,DH425,DT425,DF425 =; ITEM 425 
005712 065672 066460 070276 .WORD EM426,DH426,D1426,DF426 ITEM 426 
005722 065704 066644 070346 «WORD  EM427,DH427,DT427,DF427 =; ITEM 427 
005732 065756 067112 070346 -WORD §&M430,DH430,DT430,DF430 ITEM 430 
005742 065770 066644 070346 .WORD E£M431,DH431,D1431,DF431 7 ITEM 431 
005752 066016 066570 070276 .WORD EM432,DH432,D1432,DF432 ITEM 432 
005762 066043 066460 970276 -WORD £M433,DH433,D1433,DF433 = ITEM 433 
005772 066054 066644 070346 ~WORD EM434,DH434,DT434,DF434 ITEM 434 
006002 066124 067112 970346 -WORD £M435,DH435,DT435,DF435 =; ITEM 435 
| 006012 066136 066644 070346 .WORD £M436,DH436,D1436,DF436  ;ITEM 436 
006022 066164 066570 070276 .WORD EM437,DH437,D1437,DF437 = ITEM 437 
006032 066206 066570 070276 -WORD £M440,DH440,DT440,DF440 =; ITEM 440 
042 066230 067502 071256 .WORD EM441,DH441,D1441,DF 441 ZITEM 441 
006052 066230 067327 071274 «WORD EM442,DH442,DT442,DF442 = ITEM 442 
006062 066230 067327 071274 ~WORD  EM443,DH443,D1443,DF443 = ITEM 443 
=e 006072 066355 066524 070276 ~WORD EM444,DH444,D1444,DF 444 = ITEM 444 
1672 
1673 .SBTTL ACT11 HOOKS 


CF AAA REE REKEREKRER ERE EERE ERE EERE AERAERAEKEAREREREARARARERA EE 


sHOOKS REQUIRED BY ACT11 


006102 $SVPC=. SAVE PC 
000046 -=46 
000046 ates 33 ws hee 331)SET LOC.46 TO ADDRESS OF $ENDAD IN .$EOP 
000052 000000 «WORD 0 32:2)SET LOC.52 TO ZERO 
006102 -=$SVPC 33 RESTORE PC 
1674 -SBTTL APT PARAMETER BLOCK 


SLA EERE AERA RARER EERE REAR RAEERRERE EAA AEARARAE RARE S 


“SET LOCATIONS 24 AND 44 AS REQUIRED FOR APT 


STEARATE RARE RAE ER EERE RARAAERAERAAEAERREARRTRRAAARAREREE ES 


006102 . $X=. 32SAVE CURRENT LOCATION 

000024 2=24 3sSET POWER FAIL TO POINT TO START OF PROGRAM 
000024 000200 200 33FOR APT START UP 

000044 ~=44 :sPOINT TO APT INDIRECT ADDRESS PNITR. 
000044 006102 $APTHDR ;;POINT TO APT HEADER BLOCK 

006102 -=.$X  ;3;RESET LOCATION COUNTER 


SLR AER ERRATA AERA RAERREARKEEARARAEEAARE ERE RH 


SETUP APT PARAMETER BLOCK AS DEFINED IN THE APT=PDP11 DIAGNOSTIC 
Tat h nalgag SPEC. 


006102 " : 

006102 000000" $HIBTS: .WORD 0 3; TWO HIGH BITS OF 18 BIT MAILBOX soem, 

006104 001316 SMBADR: .WORD S$MAIL orgy OF APT MAILBOX (BITS 0-15 

006106 000010 $TSTM: .WORD 10 RUN TIM OF LONGEST TEST 

006110 000040 $PASTM: .WORD 40 ; ;RUN TIME IN SECS. OF 1ST PASS ON 1 UNIT (QUICK VERIFY) 

006112 000000 SUNITM: .WORD 0 ADDITIONAL RUN TIME (SECS) OF A PASS FOR EACH ADDITIONAL UNIT 
sa75 006114 000052 “WORD  $ETEND-$MAIL/2 ;ZLENGTH MAILBOX-E TABLE (WORDS) 
1676 
1677 006116 START: 


-SBTTL INITIALIZE THE COMMON TAGS 

3:CLEAR THE COMMON TAGS ($CMTAG) AREA 
006116 012706 001100 MOV #$CMTAG,RO FIRST LOCATION TO BE CLEARED 
006122 005026 CLR (R6)+ SICLEAR MEMORY LOCATION 





-CKFPCCO FPI1F FLTG PNT PRT C 


INITIALIZE THE COMMON T 


1678 


112737 


012737 


012737 


013746 


AGS 
007140 
001100 
043502 


000001 
043466 


006312 
006302 
000006 


177777 


006412 
000176 
000174 
000004 
001324 
000200 


001340 


177777 
043422 
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000026 
043230 


001115 


000014 
000916 
043466 
000010 


043466 


000010 


001106 
001110 


000004 
001140 
001142 
172540 


000042 


CMP #SWR,R6 ;;DONE? 
BNE 76 ;LOOP BACK IF NO 
MOV #STACK,SP + SETUP THE STACK POINTER 
peste A FEW VECTORS 
AESCOPE ,A#IOTVEC five VECTOR FOR SCOPE ROUTINE 
mov #340, a#IOTVEC+2 ; EVEL 7 
MOV #SERROR, aAEMTVEC. :em VECTOR FOR ERROR ROUTINE 
MOV #340, aHEMTVEC +2 szLEVEL 7 
MOV #STRAP, @#TRAPVEC ; ng VECTOR FOR TRAP CALLS 
MOV #340, @ATRAPVEC+2; téve L 7 
MOV #SPWRDN, @APWRVEC ; « POWER FAILURE VECTOR 
MOV #340, QAPWRVEC+2 pi LEV VEL 7 
MOV SENDCT, SEOPCT :; SETUP END-OF-PROGRAM COUNTER 
CLR $TIMES s: INITIALIZE NUMBER OF ITERATIONS 
ae $ESCAPE :é CLEAR THE ESCAPE ON ERROR ADDRESS 


#1, SERMAX ALLOW ONE ERROR PER 


TEST 
HINITIALIZE THE ''T-BIT'' TRAP VECTOR. THEN LOAD AAT Te. "“SRTRN'', IN 
3 THE a Maton (SEOP) ROUTINE, WITH A ‘RTI’ OR 


64$: MOV 


65$: ADD 
66$: MOV 


ASRTRN, aaTBITVEC ::SET ''T'' BIT VECTOR TO $RTRN 
#340, aMTBITVEC+2 ::LEVEL 7 


#RTI,$RTRN 7 :SET $SRTRN ~. A RII 
epee OARESVEC sTRY TO DO A RTT 
(SP) DUMMY PS 
#64, -(SP) fe PC 
TRY THE R 
1 ah eat SRIT IS LEGAL==SET $RTRN TO A RTT 
#10,SP sRTT ILLEGAL--CLEAN OFF THE STACK 
ARESVEC+2, aene vet : RESTORE TRAP CATCHER 
$TBIT : CLEAR ‘'T'’ BIT SWITCH 
#.,$LPADR : INITIALIZE THE LOOP ADDRESS FOR SCOPE 
#. ,.$LPERR SET UP THE ERROR LOOP ADDRESS 


at he FOR "a HARDWARE SWITCH REGISTER. IF NOT FOUND OR IT IS 


;EQUAL TO A * 


67$: MOV 
68$: MOV 
69$: MOV 


70$ 


4 


**, SETUP FOR A SOFTWARE SWITCH REGISTER. 
@AERRVEC ,~ (SP) ae ERROR VECTOR 


#67$ , AMERRVEC T UP ERROR VECTOR 

ADSWR,SWR ; SETUP FOR A HARDWARE SWICH REGISTER 
#DDISP DISPLAY ; AND A HARDWARE DISPLAY py ba 
#-1,aSWR TRY TO REFERENCE HARDWARE SwR 

69$ «BRANCH IF NO TIMEOUT TRAP + tate 


; SAND THE HARDWARE SWR IS NOT = 1 


68$ ;BRANCH IF NO TIMEOUT 
#68$, (SP) TISET UP FOR TRAP RETURN 
ASWREG, SWR 7:POINT TO SOFTWARE SWR 
rot Sve tT bs gall 


(SP)+,@MERRVEC ;;RESTORE ERROR VECTOR 

$PASS :CLEAR PASS COUNT 
MAPTSIZE,SENVM ZSTEST USER SIZE UNDER APT 
70$ 3YES,USE NON-APT SWITCH 
ASSWREG, SWR TINO,USE APT SWITCH REGISTER 


.SBITL TYPE PROGRAM NAME 


TYPE re NAME 7 PROGRAM IF FIRST PASS 
a- 


BNE 
CMP 


2eFIRST TIME? 
71$ ;BRANCH IF NO 
A@SENDAD , #42 TIACT=11? 


=r 


CKFPCCO FRIIF FLTG PNT 
TYPE PROGRAM NAME 


001442 
104401 


005737 


112737 
000420 


PRT C 


006540 
000042 
001336 
001140 


000001 


Pe 
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« SBTTL 


000001 
000176 


001134 73$: 
743: 


71$: ’ 
LOOP: 


07 71$ ;;BRANCH IF YES 
TYPE .72$ s TYPE ASCIZ_ STRING 
4 VALUE FOR SUF TWARE suitor REGISTER 
D442 ;sARE WE RUNNING UNDER XXDP/ACT? 
BNE 73$ BRANCH IF YES 
CMPB $ENV,41 TARE WE RUNNING UNDER APT? 
BEQ 73$ ; «BRAN< H IF YES 
CMP SWR ,ASWREG SOFTWARE SWITCH REG SELECTED? 
BNE 74$ [BRANCH IF NO 
GTSWR SIGET SOF T=SWR SETTINGS 
BR 


74$ 
MOVB #1, $AUTOB 33SET AUTO-MODE INDICATOR 


BR 71$ ;GET OVER THE ASCIZ 
eASCIZ <CRLF>*CKFPCCO FPHTE FLTG PNT PRT (C*<CRLF> 
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TEST # 1 = STF WITH ILLEGAL ACCUMULATOR TEST 2 aie 


1691 -SBTTL TEST # 1 = STF WITH ILLEGAL ACCUMULATOR TEST 
SS RARER AARAARERRAERAARAAERAARARARARRAKARARORARARRRAARERARATAHARARAEED 


SeTEST 1 STF WITH ILLEGAL ACCUMULATOR TEST 
“eTHIS IS A TEST OF THE ST INSTRUCTION USING ILLEGAL ACCUMULATOR 7, MODE 0. 
** 


. 
Vitae eee eee RRR RRR RR RRR RR RR RRR RRR ERE SE RRR RRR RR SRR RRR RRR RRR SEE SS | 


1690 006600 000004 tsi 43 SCOPE 
1693 006602 0001: 
006602 104413 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
1694 006604 005000 CLR RO SET THE FPS. 
a 006606 170100 LDFPS RO 
1697 006610 012737 006646 000244 MOV MOOOT ,FPVECT :SET UP FOR FP TRAPS. 
Mb te 006616 012737 006624 001236 MOV #1$,$TMP2 
1700 006624 174007 1$: STF ACO,AC7 sTHIS TEST INSTRUCTION SHOULD 
x3 ;CAUSE A TRAP, 
1703 REPORT FAILURE OF USE OF ILLEGAL ACCUMULATOR 7 TO CAUSE AN FPP TRAP. 
1704 006626 0002: 
1705 006626 170200 STFPS RO sGET FPS. 
1706 006630 010037 001240 MOV RO, $TMP3 
1707 006634 170300 STST RO :GET FEC. 
1708 006636 010037 001242 MOV RO, $TMP4 
1709 006642 104001 3$: ERROR +1 STF WITH ILLEGAL ACCUMULATOR, MODE 
1710 30, DIDN'T TRAP. ST 765 TO ST 537. 
a4 006644 090434 Ru OOODONE 
1713 : TRAP TO OOOT, HERE, WHEN THE EXPECTED ERROR OCCURS. 
1714 006646 011600 OOOT: MOV (SP) ,RO ;MAKE SURE THE ERROR OCCURRED 
1715 006650 022700 006626 CMP #0002 ,RO sAT THE CORRECT ADDRESS. 
1716 006654 001402 BEQ 0003 BRANCH IF TRAP ADDRESS CORRECT. 
1717 006656 000137 047240 JMP FPSPUR ;IF INCORRECT GO REPORT SPURIOUS 
Fay FP TRAP. 
1720 006662 170204 0003: STFPS R4 sGET FPS. 
1721 006664 170305 STST R5 :GET FEC. 
1722 006666 010437 001240 MOV R4,STMP3 SAVE DATA INCASE OF ERROR. 
1723 006672 010537 001242 MOV RS,$TMP4 
1724 006676 012702 100000 MOV #100000,R2 sEXPECTED FPS 
1725 006702 012703 000002 MOV #2,R3 EXPECTED FEC 
1726 006706 010237 001244 MOV R2,$TMP5 
1727 006712 010337 001246 MOV R3,$TMP6 
1758 006716 022626 CMP (SP)+,(SP)+ RESET THE STACK. 
1730 006720 020204 CMP R2,R4 ;WAS FPS CORRECT? 
1731 006722 001402 BEQ 0004 ;BRANCH IF YES. 
1732 OTHERWISE REPORT FPS INCORRECTLY 
1733 006724 104002 1$: ERROR +2 sSET AFTER USE OF ILLEGAL ACC. 
fe 006726 000403 BR OOODONE 
1736 006730 020305 0004: CMP R3,R5 iWAS THE FEC CORRECT? 
1737 006732 001401 BEQ OOODONE BRANCH IF CORRECT. 
1738 sOThcRWISE REPORT INCORRECT FEC 
1739 006734 104003 1$: ERROR +3 sAFTER USE OF ILLEGAL ACC. 


32 
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TEST # 1 = STF WITH ILLEGAL ACCUMULATOR TES 


1740 
1741 006736 OOODONE : 
006736 104412 RSETUP 


+0 INITIALIZE THE FPS AND STACK; AND 
EE IF THE USER HAS EXPRESSED 


“THE DESIRE TO CHANGE THE SOF TWARE 
;VIRTUAL CONSOLE SWITCH REGISTER (HAS 
i; THE USER TYPED CONTROL G?). 


SEQUENCE 


33 
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TEST # 2 = FDST MODE 1, FLOATING MODE, TEST 


1751 -SBTTL TEST # 2 = FDST MODE 1, FLOATING MODE, TEST 
PLR E EERE REE EERE RE EE REE Re 
| TEST 2 FDST MODE 1, FLOATING MODE, TEST 


:*THIS IS A TEST OF THE STF INSTRUCTION USING FDST MODE 1. 
+ 


© 
DAP eee RRR RRR ERR RRR RRR RRR ARSE EE SRR RRR RRR RR RRR SRR RRA S SE SS 


752 006740 000004 TST2: SCOPE 
' 1753 006742 PPP1: 
ee 006742 104413 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
| 4 
| 1755 006744 012700 177777 MOV #-1,R0 :SET UP A BACKROUND PATTERN IN THE 
, 1756 006750 012701 007100 MOV #PPPBFO,R1 : INPUT BUFFER. 
| 1757 006754 012702 000014 MOV #14,R2 
| 1758 006760 010021 PPP2: MOV RO, (R1)+ 
1759 006762 077202 SOB R2.PPP2 
| 1761 006764 012700 000200 MOV #200.R0 ;SET FD MODE. 
1762 006770 170100 LDFPS RO 
1763 006772 012700 007130 MOV #PPPTP1 RO :PUT TEST DATA INTO ACO. 
1766 006776 172410 LDD (RO) ,ACO 
1766 007000 012700 007114 MOV #PPPBF1,RO :FDST ADDRESS. 
1767 007004 005002 CLR R2 ‘CLEAR THE FPS. 
1768 007006 170102 LDFPS Re 
1769 007010 012737 007022 001236 MOV #PPP3,$TMP2 
1770 007016 010037 001240 MOV RO, $TMP3 
77 007022 174010 PPP3: STF ACO, (RO) zTEST INSTRUCTION. 
/ 
1774 007024 022700 007114 CMP #PPPBF 1,RO yWAS RO MODIFIED DURING EXECUTION? 
ee 007030 001404 Y BEQ PPP4 :BRANCH IF RO NOT MODIFIED, CORRECT. 
1777 007032 010037 001242 MOV RO, $TMP4 OTHERWISE REPORT ERROR, RO MODIFIED. 
1778 007036 104004 1$: ERROR +4 
17 007040 00045 BR PPPDONE GO TO NEXT TEST. 
1781 007042 012700 007114 PPP4: MOV #PPPBF 1,RO s CHECK THE DATA IN THE QUTPUT BUFFER. 
1782 007046 012701 007130 MOV #PPPTP1_R1 
1783 007052 022021 CMP (RO)+,(R1)+ 
1784 007054 001031 BNE PPP1() ;BRANCH IF INCORRECT. 
1785 007056 022011 CMP (RO) +, (R1) 
1786 007060 001027 BNE PPP10 ;BRANCH IF INCORRECT. 
1787 007062 022720 177777 CMP #-1,(RO)+ sWAS FLOATING MODE USED? 
1788 007066 001034 BNE PPP15 SBRANCH IF NOT. 
1789 007070 022710 177777 CMP #-1, (RO) 
1790 007074 001031 BNE PPP4}5 
1791 007076 000437 BR PPPDONE :GO TO NEXT TEST. 
1793 007100 177777 177777 177777 PPPBFO: .WORD <-1,-1,-1,-1,-1,-1 
1795 007114 177777 177777 177777 PPPBFI1: .WORD -1,-1,-1,-1,-1,-1 
1 
1797 007130 123456 023456 FPPTP1: .WORD 123456,23456 
1798 007134 034567 045671 ~WORD  34567,45671 





——-————_——_-------- 


CKFPCCO FRIIF FLTG PNT PRT C 
TEST # 2 = FDST 


1800 
1801 007140 
1802 007146 
1803 007154 
1804 007156 
1805 


| 1806 

1807 007160 
1808 007166 
1809 007174 


1810 
1811 007176 
007176 
1812 
1813 
1814 
1820 
} 
| 


MODE 1, FLOATING MODE, TEST 
;REPORT DATA IN oie PUT BUFFER INCORRECT. 
PPTP1,$1TMP4 


012737 
ASE 4 


012737 
012737 
104006 


104412 


007130 001242 PPP10: 
007114 001240 


;REPORT 
007130 001242 PPP15: 
007114 001240 18 


PPPDONE : 


MOV 

MOV 
ERROR 
BR 


MOV 
MOV 
ERROR 


RSETUP 


3 
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RPPPBF1“SIMPS 

+ 

PPPDONE 
FLOATING MODE NOT USED, 


APPPTP1,$TMP4 
#PPPBF 1, $TMP3 


+6 


SEQUENCE 35 


BAD DATA. 
BUT FD FAILED. 
3ST 707 TO 245 INTO 244 (BUT FD). 


3GO INITIALIZE THE FPS AND STACK; AND 
TSEE IF THE USER HAS EXPRESSED 

THE DESIRE TO CHANGE THE SOF TWARE 
TVIRTUAL CONSOLE SWITCH REGISTER (HAS 
ZTHE USER TYPED CONTROL G?). 





CKFPCCO FPIIF FLTG PNT 
| TEST # 3 = FDST MODE 2 


1821 


007200 000004 


007202 104413 


5 
1826 007204 012700 
1827 007210 012701 
1828 007214 012702 
1829 007220 010021 
en 007222 077202 


183 
1832 007224 012700 
1833 30 00 


eee 007236 172610 
1837 007240 012700 
005002 


1839 007246 170102 
1840 007250 012737 


1842 007256 174020 


1868 
1869 007402 012737 


Kk 3 
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TEST # 3 = FDST MODE 2 TEST 


MOSS AASRALAaRARSAS RA RRRRRARRR ARR RRA RRRRR RS ARR RAR RRR RRS RRS RRR SS SD | 


FDST MODE 2 TEST 


:*THIS IS A TEST OF BOTH STF AND STD WITH FDST MODE 2. 


Ps 
Pee eee RERARRRSRRRRRRRRRRRRRR SRS RRS ES MRR ASRS ARERR RARER RRR RSS ESS 


;REPOR 
007372 001240 00010: 


PRT C 
TEST 
. SBTTL 
;FTEST 3 
TST3: SCOPE 
sFIRST TEST STF. 
QQQ1: 
LPERR 
177777 MOV 
007342 MOV 
000014 MOV 
QQQ2: MOV 
SOB 
000200 V 
LDFPS 
007372 MOV 
LDD 
007356 MOV 
CLR 
LDFPS 
007256 001236 V 
QQ03: STF 
007362 CMP 
BEQ 
001242 MOV 
007362 001240 MOV 
1$: ERROR 
BR 
007356 QQQ4: MOV 
007372 MOV 
CMP 
BNE 
CMP 
BNE 
177777 CMP 
BNE 
177777 CMP 
BNE 
BR 
177777 177777 QQQBFO: .WORD 
177777 177777 QQQBF1: . WORD 
QQQTP1: 76543 
5432 
54321 
321 


MOV 


;SET UP THE LOOP ON ERROR ADDRESS. 
#=-1,RO ;SET UP THE OUTPUT BUFFER. 


#QCQBFO,R1 

#14,R2 

RO, (R1)+ 

R2,QQ02 

laa :SET FD MODE. 

#QQQTP1,RO sSETUP ACO. 

(RO) ,ACO 

“+ meal Somes sFDST ADDRESS. 

R2 sSET FPS. 

#0003,$TMP2 

ACO, (RO) + ; TEST INSTRUCTION. 

#QQQRF 1+4,R0 ;WAS RO INCREMENTED BY 4 PROPERLY? 
Q004 ;BRANCH IF RO CORRECT. 

RO, STMP4 ;REPORT RO INCORRECT AFTER FDST MODE 2. 
#QQQBF 1+4,$TMP3 

+7 ;BAD CONSTANT USED OR DIDN'T GO 527 TO 642 
QQQDONE 

#QQQBF 1,RO sWAS THE OUTPUT DATA CORRECT? 
#QQQTP1,R1 

(RO)+,(R1)+ 

Q0010 ;BRANCH IF INCORRECT. 

(RO)+,(R1)+ 

00010 ;BRANCH IF INCORRECT. 

(RO) +, 4-1 : SEE IF ANY OTHER DATA BUFFER WORDS WERE MODIFIED. 
00010 ;BRANCH IF INCORRECT. 

(RO) +, 4-1 

00010 ;BRANCH IF INCORRECT. 

Q0020 


-1,-1,°1.-1,°1.71 
bs es es 


43210 
T OUTPUT DATA INCORRECT: 


#QQQTP1,SITMP3 


_CKFPCCO_FPIIF FLTG PNT 


| 


TEST # 


1870 007410 
1871 007416 
ers 007420 
1873 
1874 
1875 
1876 ress 
1877 007424 


3 = FDST MODE 2 


012737 
104010 
000457 


012737 
012737 
104012 


104412 


PRT C 
TEST 


007356 


007342 
000014 


000200 
007372 


007556 
007470 


007366 
001242 
007366 


007356 
007372 
000004 


007372 
007356 


am 
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001242 


001236 


001240 


MOV 
ERROR 


MQQOQBKF1,$TMP4 


+10 


QQQDONE 


NOW TEST STD MODE 2. 


Qa020: 


QQQ22: 


Q0023: 


;REPORT 
Q0025: 


1$: 
QCQDONE : 





#QQQKF 0,R0 
RO,R1 


QB 0 
#00023, $TMP2 
ACO, (RO) + 
#QQQBF 1+10,R0 
QQ024 


RO,$TMP4 
#QQOBF 1+10,$TMP3" 


+11 

QQQDONE 
#QQQBKF 1,RO 
#QQQTP1,R1 
#4,R2 
(RO) +, (R1)+ 
Q0025 

R2,1$ 


BR QQQDONE 
DATA INCORRECT. 
MOV 


MOV 
ERROR 


RSE TUP 


#QQQTP1,STMPS 
| athe ttt 
+ 


SEQUENCE 37 


;BAD DATA 


;SET UP THE LOOP ON ERROR ADDRESS. 
;SET UP DEFAULT INPUT DATA BUFFER, 


sENTER FLOATING DOUBLE MODE. 

;LOAD ACO. 

;SET DESTINATION ADDRESS. 

: TEST INSTRUCTION. 

WAS RO INCREMENTED BY 10 CORRECTLY? 
BRANCH IF CORRECT. 

REPORT RO INCORRECTLY INCREMENTED. 
;DC NOT INCREM BY 10 BAD CONSTANT 


;DID THE DATA REACH THE OUTPUT BUFFER CORRECTLY? 


BRANCH IF INCORRECT. 


:BAD DATA 
:GO INITIALIZE THE FPS AND STACK; AND 
“THE DESIRE TO C 


HANGE THE SOF TWARE 
zVIRTUAL CONSOLE SWITCH REGISTER (HAS 
; THE USER TYPED CONTROL G?) 


[———--- 


| 
| 
| 
| 


1913 


1950 007710 
1951 
1952 007712 


174027 


/ CKFPCCO FRPIIF FLTG PNT PRT C 
TEST # 4 = FDST MODE 2, WITH GR7, TEST 


007644 
007712 
000004 


000200 
007722 


007742 
007642 


007732 
007644 
000004 


000003 


3 
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00000+ 


001236 


. SBTTL TEST # 4 = FDST MODE 2, WITH GR7, TEST 
MARRBEASAAAARARASLRAASASAARRARAASARALASAASSSALESA SSSA RRR SRSA RASS SSE SS 


: TEST FDST MODE 2, WITH GR7, TEST 
S THIS IS A TEST OF STF WITH GR7 MODE 2 OR IMMEDIATE MODE. 
** 


SF RAAARAAAAAAARARAAAARRAEEAAEARRARAREER | (ARR ARAAS AS AR RAR RRSRAS RSS SS S| 


TST4: SCOPE 
RRR1: 
LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
MOV #RRR3,RO ;SET UP THE DATA BUFFER FOLLOWING THE TEST INSTRUCTION. 
MOV #RRRTP1,R1 
MOV #4,R2 
1$: MOV (RO)+,(R1)+ 
SOB R2, 
bere jaa sENTER FLOATING DOUBLE MODE. 
MOV #RRRTP2,RO ;SET UP ACO. 


LDD (RO) ,ACO 
MOV #RRRIO,ERRVECT ;SET UP FOR AN ODD ADDRESS. 
MOV -~ te ,STMP2 


C R4 
THIS IS THE TEST INSTRUCTION. IT SHOULD MODIFY THE FIRST LOCATION 
;AFTER IT TO BE AN INCREMENT R4, INC R4, INSTRUCTION INSTEAD 
;OF AN INCREMENT R1 INSTRUCTION. THE INCREMENT R4 SHOULD NOT BE 
sEXECUTED SINCE THE PC SHOULD BE INCREMENTED BY TWO DURING IMMEDIATE 
;MODE ADDRESSING. THUS AFTER THE EXECUTION OF THE NEXT 5 INSTRUCTIONS 
;R1_SHOULD CONTAIN 3 AND R4 SHOULD CONTAIN 0. 


RRR2: STD ACO, (R7)+ ;TEST INSTRUCTION 
RRR3: INC Ri STHE STD INSTRUCTION SHOULD CHANGE THIS TO INC RG. 
INC Ri 
INC R1 
MOV #RRREXP RO sSEE IF THE DATA WAS OUTPUT CORRECTLY. 
MOV #RRR3,R2 


MO #4,R 
RRR4: CMP (RO)+, (R2)+ 
BNE RR25 


R ;BRANCH IF INCORRECT. 
$OB R3.RRR4 


TST RG sMAKE SURE R4 IS O. 
BNE RRR15 ‘BRANCH IF R4 IS INCORRECT. 
CMP #3,R1 7SEE iF R1 IS CORRECT 
BNE RRR15 * BRANCH IF R1 IS INCORRECT. 
BR RRRDONE 
; THESE ARE TEST DATA PATTERNS USED TO SET UP THE OUTPUT BUFFER AT RRR3. 
RRRTP1: INC R1 
INC R1 
INC R1 
INC R1 
s THIS IS THE DATA PUT IN ACO BEFORE EXECUTION OF THE STD. 
RRRTP2: INC RS 
INC RG 
INC RS 


INC RS 
7THIS IS THE EXPECTED DATA AT RRR3 AFTER EXECUTION OF THE SID. 


a LSS ee ee = ‘ 


pa 


TEST # 4 = FDST 


| 
| REPCCO,FPTIF FLIG ENT PREC 


1962 007732 


1973 007760 
1974 
1975 007764 


1980 
1981 010010 
1982 10012 
1983 010014 
1984 


1985 
1986 010016 





MODE 2, WITH GR7, 


011602 
032702 


001005 
020227 
001412 
000137 


010237 


012737 
012737 
104015 
000422 


012737 


010237 
104016 
104412 


000001 
007646 
047302 


001236 
007646 


001236 


007644 
007732 


007646 
007644 
007646 
177775 


001242 


3 
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TEST 


001240 


001240 
001242 


001240 


001242 


SEQUENCE 


RRREXP: INC R4 
INC 
INC R1 
INC R1 
oT ao a IN THE FDST FLOWS RESULTS IN AN GDD ADDRESS TRAP THROUGH 
: H 2 


RRR10: MOV (SP) .R2 :SEE IT THE TRAP WAS BECAUSE OF AN ODD ADDRESS. 
BNE RRR11 ;BRANCH IF YES. 
CMP Re, ARRR3+2 ‘SEE IF THE TRAP OTCURRED AT THE TEST INSTRUCTION. 
BEQ R12 SBRANCH IF YES 


JMP CP PSPUR : OTHERWISE REPORT A SPURIOUS TRAP THROUGH VECTOR 4. 
REPORT A FAILURE IN THE FDST FLOWS RESULTED IN AN ODD ADDRESS TRAP. 
V 


RRR11: 
MOV #RRR3+2,$TMP3 
CMP (SP)+,(SP)+ 
1$: ERROR +13 ;BAD CONSTANT #2 + PC ODD ADDR. 


BR RRRDONE 
RRR12: MOV R2,$TMP2 
CMP ies 
+ 


1$: ERROR ;0DD ADDRESS TRAP 
BR RRRDONE WRONG MODE USED. 
;REPORT DATA INCORRECT: 
RRR25: MOV #RRR3,STMP3 
MOV #RRREXP ,STMP4 
1$: ERROR +15 ;BAD DATA BUT GR7 FAIL 
BR RRRDONE 


REPORT PC INCORRECT MODIFIED DURING THE EXECUTION OF FDST Peat 
3;MODE. THE PC SHOULD HAVE BEEN INCREMENTED BY 2 BUT IT WASN'T 
iUSE RI a4 R4 TO COMPUTE THE ACTUAL ACTION THAT WAS TAKEN ON THE PC. 


#RRR3+2 ,$TMPS 
TST R4 71S R4 CLEAR. 
BEQ 1$ 
MOV #RRR3,$TMPS 
BR $ 
1$: MOV #RRR3+2,R2 
ADD #-3,R1 
ASL R1 
SUB R1,R2 
2$ MOV R2,$TMP4 
3$: ERROR +16 BAD CONSTANT PC+ 
RRRDONE : 


3GO INITIALIZE THE FPS AND STACK; AND 
[SEE IF THE USER HAS EXPRESSED 

; THE DESIRE TO CHANGE THE SOF TWARE 
SVIRTUAL CONSOLE SWITCH REGISTER (HAS 
[THE USER TYPED CONTROL G?). 


39 


| B 4 
ic CKFPCCO FP11F FLTG se PRT 1° MACRO M1113 O9=APR=-81 13:53 PAGE 14 SEQUENCE 40 
TEST # 5 = FDST MODE 4 TES 
2013 . SBTTL TEST # 5 = FDST MODE 4 TEST 
OPER SBAAESBASAASSAASAAASASLARRASLASLARLASA SRS SSE SR SERS SSSR RRR RRR RRR RRR REDD DS 
:*TEST 5 FDST MODE 4 TEST 


:+THIS IS A TEST OF STD WITH FDST MODE 4. 


. 
 heibatesemasannnetiiilinainamuntean REECE KEKEEKEEE 


| 
| 
| 
| 010104 000004 1$T5: SCOPE 
| 2014 
2015 010106 SSS1: 
| 010106 104413 LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
| 2016 010110 012700 177777 MOV #-1,RO ‘SET UP THE OUTPUT BUFFER. 
3017 010114 012701 010244 MOV #SSSBFO.R1 
| 2018 010120 012702 900010 MOV #10,R2 
2019 010124 010021 1$: MOV RO, (R1)+ 
| 2020 010126 077202 SOB R2.1$ 
| 2021 010130 012700 000200 MCV #200,RO :ENTER FLOATING DOUBLE MODE. 
5022 010134 170100 LDFPS RO 
5023 010136 012700 010264 MOV #SSSTP1,RO :SET UP ACO. 
5024 010142 172410 LDD (RO) ACO 
5025 010144 012737 010304 000004 MOV #SSS10,ERRVECT :SET UP FOR A TRAP IO 4. 
2026 010152 012737. 010164 001236 MOV #SSS2,$TMP2 
aint 010160 0612700 910254 MOV #S5SSA1 RO :SET UP THE DESTINATION ADDRESS. 
5029 010164 174040 S$S2: STD ACO,-(RO) :TEST INSTRUCTION. 
5030 010166 005201 INC R1 
2031 010170 020027 010244 CMP RO, ASSSBFO :SEE IF RO WAS DECREMENTED PROPERLY. 
2032 010174 001060 BNE SSS15 * BRANCH IF RO IS INCORRECT. 
5033 010176 012700 010244 MOV #SSSBFO,RO “WAS THE OUTPUT DATA CORRECT? 
2034 010202 012701 010264 MOV #SSSTP1_R1 
2035 010206 012702 000004 MOV #4 R2 
3036 010212 022021 1$: CMP (RO)+, (RI) + 
5037 010214 601057 BNE $520 :BRANCH IF INCORRECT. 
2038 010216 077203 S0B R2,1$ 
2039 010220 012700 177777 MOV #-1.RO :1S THE REST OF THE OUTPUT BUFFER CORRECT, -1? 
2040 010224 012701 010254 MOV #SSSA1.RI 
2041 010230 012702 000004 MOV #4 ,R2 
2042 010234 020021 2$: CMP RO. (R1)+ 
2043 010236 001056 BNE $$§25 BRANCH IF INCORRECT. 
3044 010240 077203 SOB R2,2$ 
2045 010242 000463 BR SSSDONE 
2047 :THIS IS THE OUTPUT DATA BUFFER. 
3048 010244 177777 SSSBFO: <1 
5049 010246 177777 al 
2050 010250 177777 of 
2051 010252 177777 “a 
5052 010254 177777 SSSA1: 1 
| 3053 010256 177777 -1 
2054 010260 177777 “1 
2055 010262. 177777 -1 
2057 :THIS 1S THE TEST DATA LOADED INTO ACO: 
2058 010264 147250 $SSTP1: 147250 
2059 010266 036147 36147 
3060 010270 025036 35036 


2061 010272 147256 147250 





=o | 


~CKFPCCO FP1IF FLTG PNT 


TEST # 5 = FDST MODE 4 


2062 010274 177777 
2063 010276 177777 
2064 010300 177777 
2065 010302 177777 
2067 


2068 010304 011600 
020027 


2073 010322 000137 


4 
2075 010326 
2076 010332 


aia 010334 000426 


010037 
012737 
104020 


2083 010352 000417 
84 


5 
2086 010354 
2087 010362 
2088 010370 
2089 010372 


012737 


2093 010412 
010412 104412 


2094 


PRT C 
TEST 


010166 
010170 
047302 
001236 


001242 
010244 


010244 


010264 


010254 
010274 


e 4 
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001 246 


001240 


001242 


001242 
001240 


SSSTP2: 


3IF AN ODD ADDRESS TRAP OCCURS COME HERE: 
§SS$10: MOV (SP) ,RO 


sREPORT 
SS511% 
2$: 


;REPORT 
$SS15: 
1$: 
;REPORT 
SSS20: 
1$: 
SSS25: 


1$: 
SSSDONE : 


SEQUENCE 41 


“1 
“1 


;SEE I7 THE TRAP ACCURRED ON THE TEST INSTRUCTION. 


CMP eet 9 -#SSS2+2 


BEQ :BRANCH IF YES. 

CMP 30° ZSSS2+4 

BEQ SS :BRANCH IF YES. 

JMP SeSPUR sOTHERWISE GO REPORT A SPURIOUS TRAP THROUGH 4. 
FAILURE IN FDST FLOWS RESULTED IN AN ODD ADDRESS. 

MOV RO, $TMP2 

ERROR +17 sFDST FORK X ODD AD RES. 

BR SSSDONE 


4 Epes gh \ DECREMENTED. 
RO, $TMP4 


MOV #SSSBFO,$TMP3 

ERROR +20 RO NOT DECRE PROP 
BR SSSDONE ' 

OUTPUT DATA INCORRECT: 

MOV ASSSBFO,S$TMP3 

MOV PeseiPl. $STMP4 

ERROR +21 :;BAD DATA 

BR SSSDONE 

MOV ASSSA1 , STMP4 

MOV #SSSTP2 ,STMP3 

ERROR +22 :DATA BAD OUTSIDE TARGET AREA 
RSE TUP 


:GO INITIALIZE THE FPS AND STACK; AND 
TSEE IF THE USER HAS EXPRESSED 

;THE DESIRE TO CHANGE THE SOF TWARE 
:VIRTUAL CONSOLE SWITCH + pias (HAS 
;THE USER TYPED CONTROL G?) 


r 
| C 
| 
| 
| 


CKFPCCO FRIIF FLTG PNT PRT C 
TEST # 6 = FDST MODE 3 TEST 


2100 


2109 010446 


NOMPINSMPGNGMNINININ NNN 
— ot os ot SY 
NoNoN A AM SP ee 
MO DONAWUEWNO 


214 Zs 

2146 010572 
2147 010574 
2148 010600 


000004 


104413 


012700 
174030 


000452 


177777 


037475 


011602 
020227 
001405 


010536 
177777 
000012 


010536 
000200 
010562 
010572 


010502 
010552 


010554 
010536 


010562 
000004 


010504 


D 4 
MACRO M1113 O9=APR=81 13:53 PAGE 15 


010552 


000004 
001236 


~SBTTL 


SEQUENCE 42 


TEST # 6 = FDST MODE 3 TEST 


Ree eee eee RRR RRR RRERRRRRRRRRR RR RRRRRSRR RRR RRR RRR RRR RARE SRR SSS SD | 


TEST 6 
:*THIS IS A TEST OF FDST MODE 3 USING STD. 


FDST MODE 3 TEST 


MASSA SASARAaSSRAARSRARARRSRRR RSS ARS SRR EASA SERRA RR RR ESSE DSSS | 


7816: 
TIT): 


1$: 


TIT2: 


TTT3: 


SCOPE 


ATTTBFO,R1 

#-1,R0 

#12,R2 

RO,(R1)+ 

R2,1$ 

ATTTBFO,TTTA2 
0,RO 


DR 
On 


ATTTTP1,RO 
(RO) ,ACO 
ATTTIO, ERRVECT 
TTT2, $TMP2 
ATTTA2,RO 


ACO,a(RO)+ 
RO. ATTTA2+2 
TTT15 
ATTTBFO,R1 
ATTTTP1,R2 
#4,R3 
(R1)+,(R2)+ 
TTT20 
R3,1TTT3 
TTTDONE 


;SET UP THE LOOP ON ERROR ADDRESS. 
;SET UP THE OUTPUT DATA BUFFER. 


sENTER DOUBLE FLCATING MODE. 
SET UP ACO. 


;SET UP FOR TRAPS TO 4. 


;SET UP THE DESTINATION ADDRESS. 
3 TEST INSTRUCTION. 
;SEE IF RO WAS INCREMENTED CORRECTLY. 


[BRANCH IF INCORRECT 
;CHECK THE OUTPUT DATA BUFFER. 


sBRANCH IF NOT CORRECT. 


sTHIS IS THH® OUTPUT DATA BUFFER: 


TTTBFO 


TTTTP1: 


; TRAP oe sah = 4 TO HERE. 


TIT10: 


CMP 
BEQ 


Re, ATTT2+2 
1Tf11 


7SEE IF THE TRAP ADDRESS IS THAT OF THE TEST INSTRUCTION, 


;BRANCH IF YES. 


CKFPCCO FRIIF FLTG PNT 


49 010602 020227 
010606 001402 
010610 000137 


010614 010237 


ee a ed et nd ws 3 to ot 8s I Ls se i I 


2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 





E 4 
PRT C MACRO M1113 O9=APR=81 13:53 PAGE 15-1 SEQUENCE 43 
TEST # 6 = FDST MODE 3 TEST 


010506 
047302 


001236 


001242 
010554 001240 


010536 001240 
010562 001242 


;REPORT 
TTTV713 
1$: 
;REPORT 
T171358 
1$: 


SREPORT 
TTT20: 


1$: 
TTTDONE: 


CMP R2,ATTT2+4 , 

BEQ TTT11 ;BRANCH IF YES. 

JMP CPSPUR ;OTHERWISE GO REPORT A SPURIOUS TRAP TO 4. 

A FAILURE IN THE FDST FLOWS RESULTED IN AN ODD ADDRESS TRAP. 
MOV R2,$TMP2 


CMP (SP) +, (SP) + 

ERROR +23 :BET FDST X ODD ADR 

BR TTTDONE 

RO INCORRECT: 

MOV RO, $TMP 

MOV ATTTA2+2,$TMP3 

ERROR +24 :RO NOT INCREMENT PROPERLY 
BR TTTDONE 

INCORRECT OUTPUT DATA: 

MOV ATTTBFO,STMP3 

MOV ATTTTP1.$STMPS 

ERROR +25 :BAD DATA 

RSETUP :GO INITIALIZE THE FPS AND STACK; AND 


;SEE IF THE USER HAS EXPRESSED 

3 THE DESIRE TO CHANGE THE SOFTWARE 

; VIRTUAL CONSOLE SWITCH REGISTER (HAS 
3 THE USER TYPED CONTROL G?). 


F 4 
CKFPCCO FPIIF FLTG PNT PRT C MACRO M1113 O9=APR=81 13:53 PAGE 16 SEQUENCE 44 
TEST # 7 = FDST MODE 5 TEST 


2176 -SBTTL TEST # 7 = FDST MODE 5 TEST 


Wnt eee eee RRR RRRRRRRRRRRRRRRR RRR RRR RRS RARER R RRR RRR RRR RR RR ESSE SE Ds 


S*TEST 7 FDST MODE 5 TEST 
teTHIS IS A TEST OF FDST MODE 5 USING STD. 


* 
MOAB ASRARRSAAAAARARRRSRRRRR ARS RRR S SE RRS RRR RRR RRR RRR RR RRR RSS ES 


a 010664 000004 TST7: SCOPE 
2178 010666 UuUT: 
010666 104413 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
2179 010670 012701 011006 MOV #UUUBF 0,R1 :SET UP THE OUTPUT DATA BUFFER. 
2180 010674 012700 177777 MOV #=1,RO 
2181 010700 012702 000012 MOV #12,R2 
2182 010704 010021 1$: MOV RO, (R1)+ 
2183 010706 077202 SOB R2,1$ ‘ 
2184 010710 012737 011006 011020 MCV #UUUBF 0 , UUUAT 
2185 010716 012700 000200 MOV #200,R0 ;ENTER DOUBLE FLOATING MODE. 
2186 010722 170100 LDFPS RO 
2187 010724 012700 011032 MOV #UUUTP1 , RO :SET UP ACO. 
2188 010730 172410 LDD (RO) ,ACO 
2189 010732 012737 011042 000004 MOV #UUUTO.ERRVECT ;GET READY FOR ANY TRAPS TO 4. 
2190 010740 613737 010752 001236 MOV UUU2 , $TMP2 
2191 010746 012700 011022 MOV #UUUA2 ,RO ;SET UP THE DESTINATION ADDRESS. 
2192 010752 174050 \wuU2: STD ACO, a-(RO) ZTEST INSTRUCTION. 
2193 010754 020027 011020 CMP RO ,AUUUA2=2 [WAS RO DECRIMENTED PROPERLY? 
2194 010760 001046 BNE UUUT5 BRANCH IF RO IS INCORRECT. 
2195 010762 012701 011006 MOV #UUUBF 0,R1 TWAS THE DATA OUTPUT CORRECTLY? 
2196 010766 012702 011032 MOV #UUUTP1 .R2 
2197 010772 012703 000004 MOV #4,R3 
2198 010776 022122 UUU3: CMP (R1)+, (R2)+ 
2199 011000 001045 BNE YUU20 :BRANCH IF DATA IS INCORRECT. 
2200 011002 077303 S0B R3,UUU3 
2201 011004 000452 BR UUUDONE 
2203 ;THIS IS THE OUTPUT DATA BUFFER 
2204 011006 177777 YUUBFO: <1 
2205 011010 177777 -1 
2206 011012 177777 -1 
2207 011014 177777 -1 
2208 011016 177777 =1 
2209 011020 011006 UUUA1: UUUBF 0 
2210 011022 177777 UUUA2: <1 
2211 011024 177777 UUUA3:  =1 
2212 011026 177777 -1 
2213 011030 177777 * 
2214 011032 020212 UUUTP1: 20212 
2215 011034 023242 3242 
2216 011036 026273 26273 
go17 011040 031323 031323 
2219 ;IF A TRAP TO 4 OCCURS COME HERE. 
2220 011042 011602 Guu1d: MOV (SP) ,R2 ;SEE IF THE TRAP OCCURRED ON THE TEST INSTRUCTION, 
2221 011044 020227 010754 CMP R2 ,AUUU2 +2 
2222 011050 001405 BEQ UUUT 1 ;BRANCH IF YES. 
2223 011052 020227 010756 CMP R2,MUUU2 +4 
2224 011056 001402 BEO yuuT 1 ;BRANCH IF YES, 


CKFPCCO FRIIF FLTG PNT 
TEST # 7 = FDST MODE 5 


2225 


rn 
ror 


2263 


011060 


011132 


000137 


010237 
022626 
104026 
000416 


012737 
012737 
104030 


104412 


PRT C 
TEST 


047302 
001236 


G 4 
MACRO M1113. 09=APR=81 13:53 PAGE 16-1 SEQUENCE 45 


JMP CPSPUR  ;QTHERWISE REPORT A SPURIOUS TRAP TO 4. 
REPORT FAILURE OF FDST RESULTED IN AN ODD ADDRESS TRAP 10 4. 
YUU11: MOV R2,$TMP2 
CMP (SP) +, (SP)+ 
1$: ERROR +26 ;BET FDST © ODD ADR 
BR UW'UDONE 
REPORT RO INCORRECT. 
UUU15: MOV . RO,STMP4 
001240 MOV MUUUA2 +2 , $TMP3 
1$: ERROR +27 3RO NOT INCREMENT PROPERLY 
BR UUUDONE 


;REPORT BAD DATA. 
001242 UUU20: MOV MUUUBF 0, $TMPS 
001240 MOV MUUUTP1, $TMP3 
ERROR +30 BAD DATA 


RSE TUP 3GO INITIALIZE THE FPS AND STACK; AND 
;SEE IF THE USER KAS EXPRESSED 
3 THE DESIRE TO CHANGE THE SOF TWARE 
sVIRTUAL CONSOLE SWITCH REGISTER (HAS 
;THE USER TYPED CONTROL G?). 


1$: 
UUUDONE : 


H 4 
CKFPCCO FRTIF FLTG PNT PRT C MACRO M1113 O9=APR=81 13:53 PAGE 17 
TEST # 10 = FDST MODE 6, INDEX MODE, TEST 


2249 -SBITL TEST # 10 = FDST MODE 6, INDEX MODE, TEST 
RRR EERE EERE EERE EERE EERE REE EEE REE RE REEEEREEREORREEEEE 


Z*TEST 10 -FDST MODE 6, INDEX MODE, TEST 
;*THIS IS A TEST OF FDST MODE 6, INDEX MODE, USING STD. 


SEQUENCE 


RADA ARASAAASARRA SRA R RRR RR RRR RR RRR SRE BARR RRR RRR RRR RRR RRR RRR RSS SS 


0171134 0900004 TST10 SCOPE 
2250 DSABL AMA ;DISABLE MODE 6 TO MODE 3 CONVERSIONS 
2251 011136 vvv1 

011136 1044613 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
2252 011140 012700 000200 MOV #200,R0 sENTER DOUBLE FLOATING MODE. 
2253 011144 170100 LDFPS RO 
2254 011146 012701 011256 MOV AVVVBFO,R1 ;SET UP THE OUT PUT DATA BUFFER. 
2255 011152 612700 177777 MOV #-1,R0 
2256 011156 012702 000004 MOV #4 ,R2 
2257 011162 010021 1$ MOV RO, (R1)+ 
2258 011164 077202 S0B R2,1$ 
2259 011166 012767 011276 166610 MOV AVVV10,ERRVECT ;SET UP VECTOR 4 INCASE OF ERROR. 
2260 011174 012700 011266 MOV AVVVTP1,RO ;SET UP ACO. 
2261 011200 172410 LDD (RO) ,ACO 
2262 011202 012767 011220 170026 MOV #VVV2,$STMP2 
2263 011210 C€12700 00335 MOV AVVVBFO-5701,RO0 ;:SET UP THE DESTINATION ADDRESS. 
2264 011214 012701 000001 MOV #1,R1 
aH 011220 174060 005701 VVVe: STD ACO,5701(RO) : TEST INSTRUCTION. 
2267 011224 020027 003355 CMP RO, AVVVBFO0-5701 ;SEE IF RO WAS MODIFIED. 
2268 011230 001040 BNE VVV15 sBRANCH IF INCORRECT. 
2269 011232 012702 011256 MOV AVVVBFO,R2 sWAS THE OUTPUT DATA CORRECT. 
2270 011236 012703 011266 MOV AVVVTP1,R3 
2271 011242 012704 000004 MOV #4 RG 
2272 011246 022223 1$: CMP (R2)+, (R3)+ 
2273 011250 001037 BNE vvv20 ;BRANCH IF INCORRECT DATA, 
2274 011252 077403 SOB R4,1$ 
2275 011254 000444 BR VVVDONE 
2276 011256 177777 VVVBFO: =1 
2277 011260 177777 -1 
2278 011262 177777 -1 
2279 011264 177777 -1 
2280 011266 030313 VVVTP1: 30313 
2281 011270 023334 23334 
2282 011272 035363 35363 
seer 011274 074041 4041 
2285 :COME HERE AFTER A TRAP THROUGH VECTOR 4. 
2286 011276 011602 VVV10: MOV (SP) ,R2 ;SEE IF THE TRAP OCCURRED ON THE TEST INSTR, 
2287 011300 020227 011222 CMP R2,AVVV2+2 
2288 011304 001405 BEQ vvv11 ;BRANCH IF YES. 
2289 011306 020227 011224 (MP R2 ,AVVV2+4 
2290 011312 001402 BEQ vvv11 BRANCH IF YES. 
2291 011314 000167 035720 JMP FPSPUR ;OTHERWISE GO REPORT SPURIOUS TRAP TO 4, 
2292 SREPORT FAILURE OF FDST RESULTED IN AN ODD ADDRESS TRAP TO 4, 
2293 011320 010267 167712 VVV11: MOV R2,$TMP2 
2294 071324 022626 CMP (SP) +, (SP)+ 
2295 011326 104031 1$: ERROR +31. sFDST FORK X ODD ADD 
$538 011330 000416 BR VVVDONE 


46 


ro 


' 


1 


2298 ‘s 
2299 011532 
300 011336 
301 011344 
2302 011346 
2303 
2304 
2305 011350 
2306 011356 
2307 011364 
011366 
011366 
309 


010067 


000407 


012767 
012767 
104033 


104412 


| 
| CKFPCCO FPIIF FLTG PNT PRT ( 
EST # 10 = FDST MODE 6, 


167704 
003355 


017256 
011266 


I 4 
MACRO M1113 O9=APR=81 13:53 PAGE 17-1 
INDEX MODE, T 


ey RO oy ke aT 
mov AyiVBF0-5701, ini 


MOV #VVVBFO,STMP3 
V AVVVTP1,STMP4 


ERROR 

BR VVVDONE 
INCORRECT DATA, 
MO 

ERROR +33 


"RSETUP 


-ENABL AMA 


RO MODIFIED: 


BAD DATA 


3GO INITIALIZE THE FPS AND STACK; AND 
[SEE IF THE USER HAS EXPRESSED 
;THE DESIRE TO CHANGE THE SOF TWARE 
sVIRTUAL CONSOLE SWITCH REGISTER (HAS 
; THE USER TYPED CONTROL G?) 

:REENABLE MODE 6 TO MODE 3 CONVERS 1 ONS 


SEQUENCE 


47 


CKFPCCO FRIIF FLTG PNT_PRT C 


TEST # 11 = FDST MODE 7, 


2315 
011370 
2316 011372 
011372 
2317 011374 
2318 011400 
2319 011402 
2320 011406 
2321 011412 
2322 011416 
2323 011420 
2324 011422 
2325 011430 
2326 011434 
2327 011436 
2328 011444 
2329 011450 
2330 011454 
2331 011462 
2332 
2333 011466 
2334 011472 
2335 011474 
2336 0115 
2337 011504 
2338 011510 
2339 011512 
2340 011514 
2341 011516 
2342 011520 
2343 011522 
2344 011524 
2345 011526 
2346 011530 
2347 011532 
2348 011534 
2349 011536 
2350 011540 
2351 011542 
2352 011544 
2353 011546 
2354 
2355 
2356 011550 
2357 011552 
2358 011556 
2359 011560 
360 011564 
2361 011566 
2363 011572 


177777 


INDEX 


011520 
011530 
000004 


011464 
011466 
047240 
001236 


J 4 
MACRO M1113 O9=APR=81 13:53 PAGE 18 SEQUENCE 48 
DEFERRED MODE, TEST 


.SBTTL TEST # 11 = FDST MODE 7, INDEX DEFERRED MODE, TEST 


TORO PEREPESERSERESRESESE SERRE REESE RRS RSS SRE RRA RRR S RRR RSA SSSR R RODS SD! 


T*eTEST 11 FDST MODE 7, INDEX DEFERRED MODE, TEST 
‘*THIS IS A TEST OF FDST MODE 7, INDEX DEFERRED MODE, USING STD. 


° 
REE REE EEE EEE EERO REE RARER EEE EEE KEKE 


1ST11: SCOPE 


wwW1: 
LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
MOV #200.R0 sENTER DOUBLE FLOATING MODE. 
L 
MOV AWWWBFO,R1 :SET UP THE OUTPUT DATA BUFFER. 
MOV #-1,RO 
MOV #4,R2 
1$: MOV RO, (R1)+ 
SOB R2,1$ 
00000 MOV #WwW10,ERRVECT ;SET UP FOR TRAPS TO 4. 
MOV HWWWTP), RO ;SET UP ACO. 
LDD (RO) ,ACO 
001236 MOV AWww2, $TMP2 
mov eunn |\~ -5701,R0 ;SET UP THE DESTINATION ADDRESS. 
V 
011540 MOV MWWIWBE O , Wl! 


Www2: STD ACO, a5701 th) 3 TEST INSTRUCTION. 
CMP RO, AWwWwWwSF i-5701 ;JS RO CORRECT? 


BNE Www 15 TBRANCH IF INCORRECT 
MOV #WwWwBFO,R2 3WAS THE DATA OUTPUT CORRECTLY? 
MOV MW TPT RS 
MOV #4 RS 
1$: CMP (R2)+,(R3)+ 
BNE WwW20 BRANCH IF DATA IS INCORRECT. 
SOB R4,1$ 
BR WwWDONE 
WWWBFO: =1 


WwWTP1: sire 


WwWBF1: =1 


; TRAP THROUGH 4 TO HERE. 


Ww10: MOV (SP) ,R2 ;SEE IF THE TRAP OCCURRED ON THE TEST INSTR, 
CMP R2, AWWW2+2 
BEQ WhwW11 ;BRANCH IF YES. 
CMP R2,AWWW2+4 
BEQ wisi 1 ;BRANCH IF YES. 
JMP FPSPUR s OTHERWISE GO REPORT SPURIOUS T TO 4. 
sREPORT FAILURE OF FDST F ORK RESULTED IN AN ODD ADDRESS — TO 4, 
WhW11: MOV R2,$TMP2 


CKFPCCO FRIIF FLTG PNT PRT C 
TEST # 11 = FDST MODE 7, 


2364 ae 


022626 
2365 011600 104034 


000416 


ronroroer 
Ww 
13S 


2379 


MACRO M1113 "eee 13:53 PAGE ‘a1 SEQUENCE 49 


INDEX DEFERRED MODE, 
CMP (SP)+,(SP)+ 
1$: ERROR +34 sFDST FORK X ODD ADD 
BR WwWWDONE 
REPORT a Mra 
001242 WwWwW15: RO,$™™ 
003617 001240 MOV WWM 0-5701 ,$TMP3 
1$: ERROR +35 3RO MODIFIED! 
BR WwWDONE 
;REPORT DATA INCORRECT 
011520 001240 Www20: MOV AMWWWBFO,$TMP3 
011530 001242 MOV M#WwWTP1,$TMP4 
1$: ERROR +36 BAD DATA 
WwWWDONE : 
RSE TUP 3GO INITIALIZE THE FPS AND STACK; AND 


;SEE IF THE USER HAS EXPRESSED 

;THE DESIRE TO CHANGE THE SOF TWARE 
sVIRTUAL CONSOLE SWITCH REGISTER (HAS 
; THE USER TYPED CONTROL G?). 





-CKFPCCO FPITF FLTG PNT PRT C 


TEST # 12 = STCFD TEST 


2385 


011642 
86 


2387 

2388 011644 
011644 

2389 011646 

2390 011652 

2391 011654 


2396 011666 
2397 011670 
2398 011672 


900004 


104413 
004737 
000 


000000 
000000 





L_ 4 
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012202 


012202 


SEQUENCE 50 


.SBTTL TEST # 12 = STCFD TEST 

SLR ERR EERE RARER REE ORE ERR EER EERE ERE Ee 
i*TEST 12 STCFD TEST 

+ 

:*THIS IS A TEST OF THE STCFD INSTRUCTION. 

** 


TER REPRE RESESASLRR LESSER ERE RRR R SASSER EE OCR RRR RRR RARER RRR RSA RES ESS 


TST12: SCOPE 
3;AC=0 
XXM1: 
LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
JSR PC,STCFDS 
1$: 0 sAC 
0 
0 
0 
23: 0 sRES 
0 
0 
0 
3$: 0 ;ERROR RES. 
0 
= 
4$: 47000 sFPS BEFORE EXECUTION, 
47004 294, AFTER EXECUTION, 
147004 ;ERROR FPS. 
5$: —— aa sFDFL<=--FDFLXST 767 
- ERROR +43 ;BUT EZBT xX ST560 TO 061 INTO 261 
XXK2: 
LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
JSR PC,STCFDS 
1$: 17203 ZAC 
- 142536 
506 
172031 
23: 17203 sRES 
142536 P 
3$: 17203 ;ERROR RES. 
142536 
506 
172031 
4$: 40000 sFPS BEFORE EXECUTION, 
4009 abe AFTER EXECUTION, 
-1 sERROR FPS. 
5$: ERROR #44 2K1101,0)<=--0 K ST766 
BR 6$ 
ERROR +40 
6$: 


M 4 
1 CKFPCCO FPIIF FLTG PNT PRT C MACRO M1113 O9=APR=81 13:53 PAGE 19-1 SEQUENCE 51 
| TEST # 12 = STCFD TEST 
2433 ; 
| 2434 011774 KXX3: 
011774 104413 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
2435 011776 004737 012202 JSR PC,STCFDS 
2436 012002 050717 1$: 50717 sAC 
2437 012004 027374 27374 
75767 
77071 
es: 50717 sRES 
27374 
0 
0 
3$: ;ERROR RES. 
, 
4$: 47000 3FPS BEFORE EXECUTION. 
47000 +44 AFTER EXECUTION. 
174002 ;ERROR FPS. 
5$: _— ig ;BUT OPIC xX ST251 
ERROR +46 ;BUT EZBT X ST421 
6$: 
KXK4: 
LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
012202 JSR PC,STCFDS 
1$: 20212 zAC 
32425 
26272 
02123 
2s: 20212 sRES 
32425 
0 
3$: 20212 ;ERROR RES. 
32425 
iy 
4$: 40000 sFPS BEFORE EXECUTION. 
“owe ere AFTER EXECUTION. 
-1 4 sERROR FPS. 
5$: ERROR +47 ;BUT FD IN ROUND X ST113 
BR 6$ ; 
ERROR +40 
6$: 
XXK5: 
LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
012202 JSR PC, STCFDS 
1$: 121314 ZAC 
151617 
Otis 
13141 
2$: 121314 RES 





ks 


=n 





CKFPCCO FRPIIF FLTG PNT PRT C 


TE 


ST # 12 = STCFD 


2487 012 
24 
2491 0 


2495 0 


™~ 

Fa 

oO 

Ww 
loleleale) oO oO 
par ee Pe pe pe ee PP? 
alent aed anh aah aa aad aah cal al ant al all 
RNSFERSRINVSEE 


2500 012176 


2539 012204 


2543 012216 


TEST 
151617 
000000 


000200 


177777 





N 4 
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SEQUENCE 52 
151617 . 
6 
3$: 21314 sERROR RES. 
151617 
0 
4$ 40000 sFPS BEFO.E EXECUTION. 
40010 iPS AFTER EXECUTION. 
~1 TERROR FPS. 
5$ ERROR +30 ;BUT ENBT X $1567 OR BAD SIGN ST460 
ERROR +40 
6$: BR XXXDONE 


THIS SUBROUTINE, STCFDS, IS USED TO SEi UP THE OPERANDS, EXECUTE 
thy ye INSTRUCTION AND CHECK THE RESULTS. A CALL 
3:70 IT IS MADE THUS: 


; JSR PC, STCFDS 
ACARG: .WORD &,X,X,X ;AC_OPERAND 
: RES: «WORD X,X,X,X EXPECTED RESULT 
; ERRES: .WORD X,X,X,X ERROR RESULT 
: FPSB «WORD X FPS BEFORE EXECUTION 
; FPSA «WORD X ‘FPS AFTER EXECUTION 
: FEC: «WORD X EXPECTED FEC 
: ERFPS: .WORD xX sERROR FPS. 
; ERR1 ERROR +X [DATA ERROR. 
; BR CONT 
; ERR2: ERROR +X FPS ERROR. 
: CONT: RETURN ADDRESS 


THE OPERANDS ARE SET UP (USING ACO AS THE ACCUMULATOR). THEN 

+ THE STCFD INSTRUCTION IS EXECUTED. 

THE RESULT IS CHECKED AGAINST “RES. IF THE RESULT IS CORRECT THEN THE FPS IS 
[COMPARED WITH FPSA IF THIS TOO IS CORRECT STCFDS RETURNS CONTROL 

:TO THE CALLING ROUTINE AT CONT. IF THE FPS IS BAD STCFDS 

;COMPARE IT TO ERROR FPS. IF THIS MATCHES THEN a WILL RETURN 

3TO THE ERROR CALL AT ERR2, OTHERWISE STCFDS ITSELF 

:REPORTS THIS aretie AND THEN RETURNS TO CONT. IF THE RESULT OF THE 


RESULT THE FAILURE AFTER WHICH CONTROL WILL BE PASSED TO CONT. 


STCFDS: MOV (SP) +,R1 PICK UP THE POINTER TO THE OPERANDS. 
MOV #200,R0 sENTER pduBLe FLOATING MODE. 
LDFPS RO 
MOV ZLOAD ACO. 
LDD (R), ACO 
MOV #~1,R0 sFILL THE OUTPUT BUFFER WITH =1°S, 


— 


=m 


rc ---— -— --- 


' 
| 
| 
| 
| 
| 





2544 012222 


2551 012252 
2552 012256 
2553 

2554 012260 


2558 012272 
2559 012276 
2560 012302 
2561 012310 
2562 012314 


3 
2564 012322 


2579 012370 
80 


: 
2582 012374 


5 
2589 012420 


90 
2591 012424 
2592 012424 
T3444 012426 


5 
2596 012430 
2597 012434 
2598 012436 
2599 


2600 


CKFPCCO FRTIF FLTG PNT 
TEST # 12 = STCFD TEST 


- 012702 


176010 
170204 


016137 
aah 


077003 
016102 


000161 


104037 
000760 


020461 


PRT C 


012464 
000004 
000030 


012256 
012464 


001240 
000010 
001244 
012464 
001250 
000032 


000010 
012464 
000004 


000032 


000036 
000046 


000020 
012464 
000004 


000040 


000034 
000044 
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001236 


001242 
001252 


23: 


3$: 


4$: 
;RESULT 
15$: 


16$: 


$: 
18$: 


sFPS INCORRECT: 
20$: CMP 


MOV ASTCFT,R2 
MOV #4 ,R3 
MOV RO, (R2)+ 
SOB R3,1 
MOV 30(R1) ,RO 
LDFPS RO 
Vv #2$,$TMP2 
V ASTCFT RO 
STCFD ACO,(RO) 
STFPS = R4 
STST R5 
MOV R1,R2 
MOV R2,$TMP3 
ADD eRe 
MOV R2,$TMP5 
MOV WSTCFT STMP4 
MOV 4,$1MP7 
MOV 32¢R1)  $TMP10 
MOV R1,R2 
ADD #10,R2 
MOV #STCFT,R3 
MOV #4,R 
CMP (R2)+, (R3)+ 
BNE 15$ 
SOB RO,3$ 
MOV 32(R1) ,R2 
CMP R2,R4 
BNE 20$ 
TST R2 
BPL 4$ 
CMP 36(R1),R5 
BNE 5$ 
JMP 46(R1) 
INCORRECT: 
MOV R1, 
ADD #20,R2 
MOV MSTCFT,R3 
MOV #4 RO. 
CMP (R2)+, (R3)+ 
BNE 17$ 
—- RO, 16$ 
ERROR +37 
BR 4$ 
R4,34(R1) 
BNE 21$ 
JMP 44(R1) 


40(R1) i1F 
ZOTHERWISE. REPORT RESULT INCORRECT HERE. 
;DATA ERROR 


SEQUENCE 53 


;LOAD THE FPS. 


;SET UP THE DESTINATION ADDRESS. 
;TEST INSTRUCTION. 


;GET THE FPS. 
;GET THE FEC. 
[SAVE THE DATA IN CASE OF ERROR. 


;CHECK THE RF SULT. 


;BRANCH IF INCORRECT. 


71S THE FPS CORRECT? 

BRANCH IF FPS INCORRECT. 

:IF EXPECTED FPS IS NEGATIVE, THEN 
:GO AHEAD AND CHECK THE FEC. 


;BRANCH IF FEC IS INCORRECT. 
RETURN. 


;SEE IF ERROR WAS ANTICIPATED. 


;BRANCH IF NOT ANTICIPATED. 


ERROR WAS ANTICIPATED RETURN. 


;WAS THE ERROR ANTICIPATED. 
[BRANCH IF NOT ANTICIPATED. 
IF IT WAS ANTICIPATED RETURN, 


;THE FPS ERROR WAS NOT ANTICIPATED SO REPORT FPS INCORRECT HERE. 


——_—_-—__ -— 


2601 012442 
2602 012442 
2603 012444 
2604 





2605 
2606 012446 
2607 012454 
2608 012460 
2609 012462 
2610 012464 
2611 012474 
012474 


2612 


104040 
000751 
016137 
010537 
104041 
000742 
177777 
104412 


CKFPCCO FRIIF FLTG PNT PRT C 
TEST # 12 = STCFD TEST 


000036 
001254 


177777 


e 


’ . 2 
MACRO M1113 O9=APR=81 13:53 PAGE 194 SEQUENCE 54 CG 


21$: | 
228: ERROR +40 sFPS Xx 
BR 4$ | 
*REPURT FEC INCORREC 
001256 25$: MOV SCR sbimrre 
MOV RS,$™ 
26$: ERROR +41 FEC x | 
BR 4$ 
177777 STCFT: <=1,-1,<1,-1 
XXXDONE : 
RSE TUP :GO INITIALIZE THE FPS AND STACK; AND 


;SEE IF THE USER HAS EXPRESSED 

7 THE DESIRE TO CHANGE THE SOF TWARE 
sVIRTUAL CONSOLE SWITCH REGISTER (HAS 
;THE USER TYPED CONTROL G?). 


CKFPCCO FRITIF FLTG PNT PRT C 
| TEST # 13 = STCDF TEST 


2618 


2642 012554 
2644 012554 


8 012612 


2665 915630 


013036 


013036 


D 5 
MACRO M1113 O9=APR=-81 13:53 PAGE 20 SEQUENCE 55 


» SBTTL TEST # 13 = STCDF TEST 


pent ig + allan means orga ii a belt nit linea aera cial 


:*TEST 13 STCDF TEST 
Se THIS IS A TEST OF THE STCDF INSTRUCTION. 


° 
RRR REE REAR EEE REET EEK REE REE REE EE 


15113: SCOPE 


sAC=0 

YYY1: 
LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
JSR PC,STCDFS 

1$: 0 ZAC 
0 
0 
0 

2$: 0 RES 
0 
“ 

38: 4 ;ERROR RES. 
: 

4$: 47200 ;FPS BEFORE EXECUTION. 
ps Sa eee AFTER EXECUTION. 
-1 ERROR FPS. 

5$: ERROR +54 zFDFL<---FDFL X ST767 
BR 6$ 
ERROR +52 sFPS INCORRECT. 

6$: 

vyY2 
LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
JSR PC,STCDFS 

1$: 67574 :ACO 
73727 
170777 
67574 

2$: 67574 ZRES 
73730 
: 

3$: 67574 ZERROR RES. 
73727 
a 

4$: 40200 sFPS BEFORE EXECUTION, 
40200 ZFS AFTER EXECUTION. 
-1 : ERROR FPS. 

5$: canon Hy SETTER. ROUND FAILED OR WENT TO 766 X1(1,0)<==-0 INTO 767 
ERROR +52 


6$: 


2666 
2667 012630 
012630 


104056 


104413 
004737 
077777 

bead 


104057 
2711 012760 


2 
2713 012760 
104413 


2719 012776 100000 


CKFPCCO FPTIF FLTG PNT PRT C 
TEST # 13 = STCDF TEST 


013036 


013036 


013036 


. 2 
MACRO M1113 O9=APR=81 13:53 PAGE 20-1 


vYY2: 


1$: 
2$: 
3$: 
4E: 


5$: 


PC,STCDFS 


PC,STCDFS 


6 
+57 


PC,STCDFS 


SEQUENCE 56 


;SET UP THE LOOF ON ERROR ADDRESS. 
ACO 


sRES 
;ERROR RES. 


:FPS BEFORE EXECUTION. 

“FPS AFTER EXECUTION, 

‘ERROR FPS. 

:BUT EZBT X ST421 TO 062 INTO 262 


3SET UP THE LOOP ON ERROR ADDRESS. 
ACO 


sRES 
;ERROR RES. 


:FPS BEFORE EXECUTION. 

ZFS AFTER EXECUTION. 

TERROR FPS. 

:BUT FIV $1262 TO 123 INTO 103 


zSET UP THE LOOP ON ERROR ADDRESS. 
sACO 


sRES 


—— 


. 2 
CKFPCCO FRIIF FLTG PNT PRT C MACRO M1113 O9=APR=81 13:53 PAGE 20-2 SEQUENCE 
TEST # 13 = STCDF TEST 


2720 013000 000000 0 

2721 013002 177777 -1 

2723 013006 900000 3$: 0 ERROR RES. 

2724 013010 0 

2725 013012 177777 -1 

2726 013014 177777 -1 

2727 913016 047200 4$: 47200 ;FPS BEFORE EXECUTION. 

2728 013020 147216 147216 sFPS AFTER EXECUTION. 

2729 013022 000010 10 FEC 

2730 013024 047206 47206 TERRO OR F 

2731 013026 104060 5$: ERROR +60 :BUT Piy 27262 FAIL TO 103 INT 123 
2732 013030 000401 BR 6$ 

2733 013032 104061 ERROR +61 ;BUT FLAG ST 147 X TO ST 361 INTO 365 
2734 013034 000535 6$: BR YYYDONE 

2735 zs THIS SUBROUTINE, STCDFS, IS USED TO SET UP THE OPERANDS, EXECUTE 
2736 + THE STCDF INSTRUCTION AND CHECK THE RESULTS. A CALL 

2737 ;TO IT IS MADE THUS: 

2738 : 

2739 Z JSR PC,STCFDS 

2740 ; ACARG WORD XXX XM ;AC OPERAND 

274) ; RES . WORD KeMieMom sEXPECTED RESULT 
2742 ; ERRES WORD X,X,X,X ;ERROR RESULT 

2743 : FPSB . WORD X 3FPS BEFORE EXECUTION 
2744 FPSA . WORD x sFPS AFTER EXECUTION 
2745 ; FEC: WORD x sEXPECTED FEC 

2746 g ERFPS: .WORD x ;ERROR FPS. 

2747 2 ERR1: ERROR +X ;DATA ERROR. 

2748 3 BR CONT 

2749 ; ERR2: ERROR +X 3;FPS ERROR. 

spay : CONT: ;RETURN ADDRESS 
2752 : THE OPERANDS ARE SET UP (USING ACO AS THE ACCUMULATOR). THEN 

2753 ;THE STCFD INSTRUCTION IS EXECUTED. 

2754 : THE RESULT IS CHECKED AGAINST RES. IF THE RESULT IS CORRECT THEN THE FPS IS 
2755 : COMPARED WITH FPSA IF THIS TOO IS CORRECT STCFDS RETURNS CONTROL 
2756 :TO THE CALLING ROUTINE AT CONT. IF THE FPS IS BAD STCFDS 

2757 + COMPARE IT TO ERROR FPS. IF THIS MATCHES THEN STCFDS WILL RETURN 
2758 © ;TO THE ERROR CALL AT ERR2, OTHERWISE STCFDS ITSELF 

2759 *REPORTS THIS FAILURE AND THEN RETURNS TO CONT. IF THE + he OF THE 
2760 :STCFD IS INCORRECT, THE INCORRECT RESULT IS COMPARED WITH THE 

2761 T ANTICIPATED FAILING DATA PATTERN, ERRES. IF THE FAILURE IN 

2762 ; THE RESULT WAS ANTICIPATED CORRECTLY TO BE ERRES THEN STCFDS 

2763 WILL TRANSFEK CONTROL TO THE ERROR CALL AT ERR1. OTHERWISE THE 

2764 ZRESULT WAS INCORRECT BUT WAS NOT ANTICIPATED AND STCFDS WILL 

he REPORT THE FAILURE AFTER WHICH CONTROL WILL BE PASSED TO CONT. 

2767 013036 012601 STCDFS: MOV (SP)+,R1 :PICK UP THE POINTER TO THE OPERANDS. 
2768 013040 012700 000200 MOV #200,R0 sENTER DOUBLE FLOATING MODE. 

2769 013044 170100 LDFPS = RO 

2770 013046 010100 MOV R1,RO ;LOAD ACO. 

2771 013050 172410 LDD (RO) ,ACO 

2772 013052 012700 177777 MOV #-1,R0 sFILL THE OUTPUT BUFFER WITH -1°S. 
2773 013056 012702 013320 MOV ASTCDT,R2 

2774 013062 012703 000004 MOV #4 ,R3 

2775 013066 010022 1$: MOV RO, (R2)+ 

2776 013070 077302 SOB R3,1$% 


ee 


2777 013072 


2779 013100 
2780 013.06 
2781 013112 
2782 

2783 013114 
2784 013116 
2785 013120 
2786 013122 
2787 013126 
2788 013132 
2789 013136 
2790 013744 
2791 013150 
2792 

2793 013156 
2794 013160 
2795 013164 
2796 013170 
2797 013174 
2798 013176 
2799 013200 
2800 

2801 013202 
2802 013206 
2803 013210 
2804 013212 
2805 013214 
2806 013216 


2808 013224 


0 
2811 013230 


7 
oH 013254 


2820 013260 
2821 013260 
case 013262 


4 
2825 913264 
2826 013270 
334 013272 


9 
2830 013276 


CKFPCCO FRIIF FLTG PNT 
TEST # 13 = STCDF TEST 


104051 
000760 


020461 
001002 
000161 


104052 
000751 


PRT C 
000030 


013112 
013320 


001240 


000010 
013320 
000004 


000032 


0000 34 
000046 


000020 
013320 
000004 


000040 


000034 
000044 
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001236 
2$: 


001242 


001252 


3$: 


4$: 


sRESULT 
15$: 
16$: 


18$: 


sFPS INCORRECT: 
20$: CMP 


V 30(R1),R0 
LDFPS RO 

Vv] #2$,$TMP2 

V #STCDT,RO 
STCDF ACO,(RO) 
STFPS RG 
STST R5 
MOV R1,R2 
MOV R2,$TMP3 
ADD #10,R2 
MOV R2,$TMP5 
MOV @STCDT,STMPS 
MOV R4,$TMP7 
MOV 32(R1),$TMP10 
(ACV R1,R2 
ADD #10,R2 
MOV @STCDT,R3 
MOV #4,R0 
CMP (R2)+,(R3)+ 
BNE 15$ 
SOB RO,3$ 
MOV 32(R1),R2 
CMP R2,R4 
BNE 20$ 
TST R2 
BPL 4$ 
CMP 34(R1),R5 
BNE 5$ 
JMP 46(R1) 
INCORRECT: 
MOV R1, 
ADD #20,R2 
MOV ASTCDT,R3S 
MOV #4,R 
CMP (R2)+,(R3)+ 
BNE 17$ 
SOB RO, 16$ 
JMP 40(R1) 

pyemuise REPORT RESULT INCORRE 
ERROR +51 
SR 4$ 
R4,34(R1) 

BNE 21$ 
JMP 44(R1) 


SEQUENCE 58 
;LOAD THE FPS. 
;SET UP THE DESTINATION ADDRESS. 
s TEST INSTRUCTION. 
3GET THE FPS. 


:GET THE FEC. 
;SAVE THE DATA IN CASE OF ERROR. 


3CHECK THE RESULT. 


BRANCH IF INCORRECT. 


31S THE FPS CORRECT? 

;BRANCH IF FPS INCORRECT. 

:1F EXPECTED FPS IS NEGATIVE, THEN 
3GO AHEAD AND CHECK THE FEC. 


;BRANCH IF FEC IS INCORRECT. 
RETURN. 


3SEE IF ERROR WAS ANTICIPATED. 


;BRANCH IF NOT ANTICIPATED. 


3IF ERROR WAS ANTICIPATED RETURN. 
CT HERE. 


;DATA ERROR 


;WAS THE ERROR ANTICIPATED. 
;BRANCH IF NOT ANTICIPATED. 
IF IT WAS ANTICIPATED RETURN. 


‘ice FPS ERROR WAS NOT ANTICIPATED SO REPORT FPS INCORRECT HERE. 


eet: 


ERROR 
BR 


+52 
4$ 


sFPS xX 


eee 


ny 


H 5 
CKFPCCO FRTIF FLTG PNT PRT C MACRO M1113 09=APR=81 13:53 PAGE 20-4 SEQUENCE 59 
TEST # 13 = STCDF TEST 


2834 ;REPORT FEC INCORRECT: 
2835 013302 016137 000036 001256 25$: MOV 36(R1) ,$TMP12 
2836 013310 010537 001254 MOV R5,$1MP11 
2837 013314 106053 26$: ERROR +5 sFEC x 
2838 013316 000742 BR 4$ 
2839 013320 177777 177777 177777 STCDT: =1,-1,-1,°1 
2840 013330 YYYDONE : 
013330~% 104412 RSE TUP 3GO INITIALIZE THE FPS AND STACK; AND 


;SEE IF THE USER HAS EXPRESSED 

7 THE DESIRE TO CHANGE THE SOF TWARE 
;VIRTUAL CONSOLE SWITCH REGISTER (HAS 
3 THE USER TYPED CONTROL G?). 


-——o 


CKFPCCO FRIIF FLTG PNT 
TEST # 14 = STCFD WITH 


2846 


013332 
2847 
2848 013334 
013334 


34 013352 
2854 013354 


3366 
2859 013372 
860 013374 


2863 013376 
2864 013402 





170305 


010437 
012737 
104062 
000406 


010537 


104412 


1 5 
PRT C MACRO M1113 os 13:53 PAGE 21 SEQUENCE 60 
ILLEGAL ACCUMULATOR TES 


040000 
013352 001236 


140000 
000002 


001242 
140000 001240 


001242 
000002 001240 


-SBTTL TEST # 14 = STCFD WITH ILLEGAL ACCUMULATOR TEST 


DEet eee eR RRR RRR RRR RRR RRRRRRRR SRR RRR RRR SRR RARER RRR RRR RRR SAR RRS EE OD 


PSTEST 14 STCFD WITH ILLEGAL ACCUMULATOR TEST 
:+THIS TEST STCFD WITH ILLEGAL AC 6. 


y -caceeneusendequsnuantrenesusscesenne LAR RRR SASS R RRR RRR RRS EE ee 


TST14: SCOPE 


7221: 
LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
MOV #40000,R0 [DISSABLE INTERRUPTS. 
LDFPS R 
MOV #2772, $1TMP2 
Z2ZZ2: STCFD ACO,AC6 ;THIS TEST INSTRUCTION SHOULD CAUSE AN ERROR. 
STFPS RG sGET FPS. 
stot R5 GET FEC. 
CMP R4,4140000 31S FPS CORRECT? 
BNE 272210 ‘BRANCH IF INCORRECT FPS. 
CMP #2,R5 1S FEC CORRECT? 
BNE 77715 ;BRANCH IF INCORRECT. 
BR ZZZDONE 
“REPORT FPS INCORRECT AFTER USE OF ILLEGAL ACCUMULATOR. 
72210: MOV R4,$TMP4 
MOV #140000, $TMP3 
1$: ERROR +62 ;BUT FDST ST767 X TO 567 INTO 577 
BR ZZZDONE 


sREPORT FEC INCORRECT AFTER USE OF ILLEGAi ACCUMULATOR. 
22215: MOV R5,$TMP4 : 


MOV #2,$TMP3 
$: ERROR +63 sFEC<=--2 ST577 x 
ZZZDONE : 
RSETUP :GO INITIALIZE THE FPS AND STACK; AND 


:SEE IF THE USER HAS EXPRESSED 

;THE DESIRE TO CHANGE THE SOF TWARE 
;VIRTUAL CONSOLE SWITCH REGISTER (HAS 
i; THE USER TYPED CONTROL G?). 


CS 


Ae FPIIF os fest’ PRT C 


TEST # 15 = CLRD 
2879 


013432 
2880 013434 
013434 
2881 013436 
2882 013442 


2886 013456 
2887 013462 
2888 013466 
2889 013470 
2890 013476 170410 
289 


170205 


001020 
000442 


012737 
012737 


6 
2917 013574 
2918 013600 
2919 013606 
4 013610 


010037 
012737 


104066 
000414 


12 073475 
14 067707 
16 127347 
20 056770 


013622 
013612 
000004 


013612 
000213 


013476 


900004 
013612 


000204 
013612 


013612 
013632 


001242 
000204 


4. 35 
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001236 


001240 
001242 


001240 


001240 


. SBTTL 


TEST # 15 = CLRD TEST 


SEQUENCE 61 


DAP e eee ReeRRRRRRRRARARRRRRRRR RRR RR RE RRR RRR RRR RRR RRR RRR RRS SRR SS SS 


S*TEST 15 
'* 

s*THIS IS A TEST OF THE CRLF AND CLRD INSTRUCTIONS. 
rs . 


Masi iti SiseSA RAR 222 RR RRRRSERR SSSR SE MSR RRS RRA RSS SASS RRR RSE S SS 


2s: 


3$: 


;RESULT 
AAB2: 
1$: 
:REPORT 
AAB3: 
18: 
:REPORT 
AABG: 


1$: 


CLRD TEST 


SCOPE 

MOV HAABTP1 ,RO 

MOV #AABBFO,R1 
#4,R2 

MOV (RO) +,(R1)+ 


STFPS RS5 


MOV #4 ,R2 

MOV MAABBFO,R1 
TST (R1)+ 

BNE AAB 

SOB Re, 

CMP #204,R5 
BNE AAB 


BR AABDONE 


NOT 0, REPORT ERROR. 
MOV MAABBF 0, $TMP3 
MOV MAABTP2 ,STMPS 
ERROR +64 
BR AABDONE 
FPS INCORRECT: 
MOV R4,$TMP4 
MOV #204, $TMP3 
ERROR +65 
BR AABDONE 
— INCORRECT. 

RO,$T™M 


Mov PAABBFO. STMP3 
ERROR +66 
BR AABDONE 


;SET UP THE LOOP ON ERROR ADDRESS. 
;SET UP OUTPUT BUFFER 


sSET UP +? sgatcraen OPERAND ADDRESS. 
‘SET UP FPS. 

s TEST INSTRUCTION. 

sGET FPS. 

sSEE IF RESULT CLEAR, 0. 

;BRANCH IF RESULT INCORRECT, NOT 0. 
;SEE IF FPS IS CORRECT. 

‘BRANCH IF INCORRECT. 


;SEE IF RO IS CORRECT 
:BRANCH IF RO IS INCORRECT. 


;BAD DATA = 


O x 11#ZERO ST770 x 


;BAD FPS 


;THIS IS_THE TEST DATA BUFFER, OUTPUT DATA BUFFER. 
AABBFO: 73475 


6 
127347 


56770 
3THIS IS THE DATA USED TO SET 


UP THE OUTPUT BUFFER, 


—--->->------ SS 


CKFPCCO FPIIF FLTG PNT PRT C 
TEST # 15 = CLRD TEST 


2928 013622 
a. 
2931 013630 
| 
2933 013632 


| 
| 
| 9937 013642 
| 013642 
| 


2938 


073475 
067707 
127347 
056770 


000000 
000000 
000000 
000000 


104412 


K 5 
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AABTP1: 73475 

67707 

127347 

56770 
3THIS IS THE EXPECTED DATA, RESULT: 
AABTP2: 0 


0 


0 
AABDONE : 
RSETUP :GO INITIALIZE THE FPS AND STACK; AND 

;SEE IF THE USER HAS EXPRESSED 

: THE DESIRE TO CHANGE THE SOF TWARE 
sVIRTUAL CONSOLE SWITCH REGISTER (HAS 
; THE USER TYPED CONTROL G?). 


=—ae 


/CKFPCCO FPI1F FLTG PNT PRT C 


TEST # 16 = CLRD WITH TLLEGAL ACCUMULATOR TES 


2944 


013644 
2945 013646 
013646 

2946 013650 
2947 013654 
2948 013656 
Seen 013664 


2963 013724 


966 013726 
2967 013732 


000004 
104413 


170407 
170204 


1000406 


010537 
012737 
104070 


104412 


040200 


013664 001236 


140200 
000002 


001242 


140200 001240 


001242 
000002 001240 


» SBTTL 


s*TEST 16 


5 
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SEQUENCE 63 


TEST # 16 = CLRD WITH ILLEGAL ACCUMULATOR TEST 


SL AAA ARARAARREKEAERAEREREAAAERAERKRRRROERHRRRAEAKRRAER EERE RRA REARS 


CLRD WITH ILLEGAL ACCUMULATOR TEST 


‘*THIS IS A TEST OF CLRD WITH ILLEGAL AC7. 


= 2 
e 


TOSS ERRRSSASRRS ASSES ESE RRR RRR SRSA RSE S SRR RRR SRS RRA RASS RARE SOS DS 


CCBe: 


ZREPORT 
(CB10: 


1$: 


sREPORT 
(B15: 


1$: 
CCBDONE : 


SCOPE 


MO ee 
MOV ACCB2,$TMP2 
AC7 


STFPS R4 

STST R5 

CMP R4,4140200 
BNE CCB10 

CMP #2,R5 

BNE CCB15 

BR CCBDONE 
INCORRECT "at 

MOV R4,$TMP4 
MOV #140200, $TMP3 
ERROR +67 

BR CCBDONE 
INCORRECT FEC: 

MOV R5,$TMP4 
MOV #2, $TMP3 
ERROR +70 

RSE TUP 


:TEST TITLE:NEGF, ABSF 


;SET UP THE LOOP ON ERROR ADDRESS. 
SET UP THE FPS, NO INTERRUPTS AND FD=1. 
3TEST INSTRUCTION. 


GET FPS. 
sGev FEC, 


31S THE FPS CORRECT? 
;BRANCH IF FPS IS INCORRECT. 
:IS THE FEC CORRECT 
[BRANCH IF FEC IS INCORRECT. 


;BUT FDST ST 700X TO 607 INTO 677 


sFEC<---2 ST 677 X 


3GO INITIALIZE THE FPS AND STACK; AND 
;SEE IF THE USER HAS EXPRESSED 

THE DESIRE TO CHANGE THE 
:VIRTUAL CONSOLE SWITCH REGISTER (HAS 
;THE USER TYPED CONTROL G?). 


AND TSTF SOURCE MODE 0 WITH ILLEGAL AC7, TEST 


SOF TWARE 


cagpaeeey 


5 
CKFPCCO FRIIF FLTG PNT PRT C MACRO M1113 09-APR=81 13:53 PAGE 36 
TEST # 17 = SEE ABOVE COMMENT FOR TEST TITLE 


2980 .SBTTL TEST # 17 = SEE ABOVE COMMENT FOR TEST TITLE 


. SBR SSAAAASAA £2022 222 SESRRSSSSRRSSSSRASSRARSASAS AS AR ARRAS SEAS ESSE SD | 


T*TEST 17 SEE ABOVE COMMENT FOR TEST TITLE 


| 
i 
| 
| 5: 
| 


SEQUENCE 64 





teTHIS IS A TEST OF THE SPECIAL 
*DEST FLOWS USING THE NEGD INST 
‘*WITH MODE ZERO AND ILLEGAL 


y*AC7 
+ * 
*: ORR REBBAAASBASAARASSASASSRASASZALLASLSASSE SESE SESE RRR RRA RRR RRR RRR RSS SSS SG 
013744 000004 TST17: SCOPE 
2981 
2982 013746 VVB1: 
013746 104413 LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
2983 013750 012700 040200 MOV #40200,RO sSET UP THE FPS, FID=1 AND FD=1. 
2984 013754 170100 LDFPS RO 
2985 013756 012737 013764 001236 MOV #VVB2,$TMP2 
2987 013764 170707 VVB2: NEGD AC? :TEST INSTRUCTION. 
2989 013766 170204 STFPS R& :GET FPS. 
2990 013770 170305 STST — RS SGET FEC. 
2992 013772 022704 140200 CMP #140200, RG :1S FPS CORRECT? 
2993 013776 001004 BNE VVB10 :BRANCH IF FPS IS INCORRECT. 
2994 014000 022705 000002 CMP #2,R5 :1S FEC CORRECT 
2995 014004 001010 BNE VVB15 ‘BRANCH IF FEC is INCORRECT. 
299% 014006 000416 BR VVBDONE 
2998 :REPORT INCORRECT FPS: 
2999 014010 012737 140200 001240 VvB10: MOV #140200 $TMP3 
3000 074016 010437 001242 MOV Mpé 
3001 014022 104176 1$: ERROR ery ai :FPS BAD 
3002 014024 000407 BR VVBDONE 
3004 ;REPORT FEC INCORRECT: 
3005 014026 012737 000002 001240 vB15: MOV #2, $1TMP3 
3006 014034 010537 001242 MOV R5.$TMP4 
3007 014040 104377 1$: ERROR +377 :FEC BAD 
3008 014042 000044 <WORD 44 
3009 014044 VVBDONE : 
014044 104412 RSETUP 





:TEST TITLE:NEGF, ABSF 


3GO INITIALIZE THE FPS AND STACK; AND 
;SEE IF THE USER HAS EXPRESSED 


‘THE DESIRE TO CHANGE THE SOFTWARE 
“VIRTUAL CONSOLE SWITCH REGISTER (HAS 
‘THE USER TYPED CONTROL G?). 


AND TSTF SOURCE MODE 0 TEST 


mo 


aruns 


CKFPCCO FPTIF FLTG PNT PRT C 
TEST # 20 = SEE ABOVE COMMENT FOR TEST TITLE 


| 


3019 


3028 014072 
aes 014076 


303 

3031 014100 

3032 014104 

oe 014106 

3035 014114 
36 


3037 014116 


304 ; 
3048 014152 
en 014154 


1 
3052 014156 


eee 014202 


8 
3059 014204 
3060 014212 
3061 014216 
3062 014220 


3065 014222 


172410 
012700 
170100 
012737 
170700 


170205 


174010 


012701 
005720 


000420 


101112 


N 5 
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SEQUENCE 65 


-SBTTL TEST # 20 = SEE ABOVE COMMENT FOR TEST TITLE 


SR RRR RK EKERERER EEE 


SEE ABOVE COMMENT FOR TEST TITLE 
+ 
3*THIS IS A TEST THE NEGF, 


:*TEST 20 


;*SOURCE FLOWS. 


ABSF AND TSTF 


THE NEGD INSTRUCTION 
se1S USED TO TEST MODE 0 


4 SARA EREE RRA RRERARRE ERE KRREREERRE REAR EES 


;SET UP THE LOOP ON ERROR ADDRESS. 
;SET FD MODE. 


3SET UP me 


ACO = 0 


ZCLEAR THE FPS. 


;LOAD ACO TO BE A FLOATING O. 
4 ft ACO=ZERO 


FLOAT 
7SET FD MODE. 


3 TEST INSTRUCTION. 


GET FPS. 
;SET FD MODE. 


GET THE RESULT OUT OF ACO. 
;SEE IF THE RESULT IS CORRECT. 


;BRANCH IF THE RESULT IS INCORRECT. 


71S THE FPS CORRECT? 
[BRANCH IF THE FPS IS INCORRECT. 


sEXPECT DO 
:PREV FO IMPURE 
;GOT 


THESE ARE TEST DATA TABLES AND AN OUTPUT BUFFER. 


TST20: SCOPE 
DDB1: 
LPERR 
000200 V #200,R0 
LDFPS RO 
014222 MOV ADDBTP1 ,RO 
LDD (RO) ,ACO 
CLR RO 
LDFPS RO « 
014232 MOV #DDBTP2 ,RO 
LDF (RO) ,ACO 
000201 V #201,R0 
LDFPS 
014114 001236 V #DDB2,. $TMP2 
DDB2: NEGD ACO 
STFPS = R5 
000200 V #200,RO0 
LDFPS RO 
014242 MOV #DDBBF 0 ,RO 
STD ACO, (RO) 
000004 MOV #4,R1 
1$: TST (ROQ)'+ 
BNE DDB5 
SOB 1,1$ 
000204 CMP #204 ,R5 
BNE DDB6 
BR DDBDONE 
sRESULT INCORRECT, REPORT FAILURE: 
014232 001242 DDBS: MOV ADDBTP2, STMP4 
014252 001240 MOV ADDBTP3,$TMP3 
014242 001244 MOV A#DDBBFO,$TMPS 
1$: ERROR +71 
BR DDBDONE 
sREPORT FPS INCORRECT: 
000204 001240 DDB6: MOV #204, $1MP3 
001242 MOV R5,$TMP4 
1$: ERROR +7 
BR DDBDONE 
DDBTP1: 101112 
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CKFPCCO FRPIIF FLTG PNT PRT C MACRO M1113 O9-APR=81 13:53 PAGE 25-1 
TEST # 20 = SEE ABOVE COMMENT FOR TEST TITLE 


3066 014224 131415 131415 
3067 014226 161710 161710 
3068 014230 111213 111213 
3069 014232 000000 DDBTP2: 0 
3070 014234 9000000 0 
000000 0 
0 
3074 014242 177777 DDBBFO: =1 
3075 014244 177777 -1 
3076 014246 177777 ad 
3077 014250 177777 =} 
3078 014252 000000 DDBTP3: 0 
3079 014254 0 
3080 014256 161710 161710 
3081 014260 111213 111273 
3082 
3083 014262 DDRDONE : 
014262 104412 RSETUP 3GO INITIALIZE THE FPS AND STACK; AND 
;SEE IF THE USER HAS EXPRESSED 
3 THE DESIRE TO CHANGE THE SOFTWARE 
;VIRTUAL CONSOLE SWITCH REGISTER (HAS 
5084 ;THE USER TYPED CONTROL G?). 
3085 sTEST TITLE:NEGF, ABSF AND TSTF SOURCE MOP’ 1 TEST 


| 

| 
3071 014236 
3072 014240 000000 
3073 


SEQUENCE 


66 


Ten) 


r--— - esse esaeennenssaes-secneseiiill 


¢ 6 

CKFPCCO FPITIF FLTG PNT PRT C MACRO M1113 O09=APR=81 13:53 PAGE 26 SEQUENCE 67 
| TEST # 21 = SEE ABOVE COMMENT FOR TEST TITLE 

3086 -SBTTL TEST # 21 = SEE ABOVE COMMENT FOR TEST TITLE 

PRA E RRR EE EE EEE ETE EERE TERE EERE EERE Eee 

*TEST 21 SEE ABOVE COMMENT FOR TEST TITLE 


j 3* 

:*THIS IS A TEST THE NEGF, ABSF AND TSTF 
=*SOURCE FLOWS. THE NEGD INSTRUCTION 
:*1S USED TO TEST MODE 1 

*& 


° 
'WenheRAASAAAASSASAAR ASA SLA R RAARRSRRARRSERRE SARS RARR RS RRRRRRRRR SR RAR ASS SD | 


| 014264 000004 TST21: SCOPE 
3087 
3088 014266 EEB!: 
014266 10441 LPERR SET UP THE LOOP ON ERROR ADDRESS. 
3089 014270 012700 014376 MOV = #EEBTP1,RO SET UP THE DATA BUFFER. 
3090 014274 012701 014426 MOV = #EEBBF1,R1 
3091 014300 012702 000004 Mov = #4, Re 
3092 014304 012021 1$: MOV (RO) +, (R1)+ 
3093 014306 077202 SOB sR, 
3094 014310 012700 000200 MOY = == -#200,RO SET FD MODE. 
3095 014314 170100 LDFPS RO 
3096 014316 012700 014426 MOV = #EEBBF 1,RO ;SET UP THE OPERAND ADDRESS. 
3097 014322 012737 014336 001236 MOV = HEEB2,, $TMP2 
3098 014330 012737 014436 000004 MOV § #EEB10,ERRVECT ;SET UP VECTOR 4 IN CASE OF ERROR. 
3099 014356 170710 EEB2: NEGD = (RO) TEST INSTRUCTION. 
3101 014340 170205 STFPS RS GET FPS. 
3102 014342 012701 014426 MOV = #EEBBF1,R1 SEE IF RESULT IS CORRECT. 
3103 014346 012702 000004 MOV =: #4, R2 
3104 014352 005721 1$: TST (R1)+ 
3105 014354 001046 BNE EEBI5 ;BRANCK IF NOT CORRECT. 
3106 014356 077205 SOB sR, 18 
3108 014360 020627 014426 (MP «RO, MEEBBF 1 1S RO CORRECT? 
3109 014364 001055 BNE EEB20 BRANCH IF NOT CORRECT. 
3110 014366 022705 000204 CMP #2045 :1S THE FPS CORRECT? 
3111 014372 001061 BNE EEB25 ;BRANCH IF NOT CORRECT. 
3112 014374 000466 BR EEBDONE 
3114 ; THESE ARE_TEST DATA TABLES AND A BUFFER. 
3115 014376 000177 EEBTP1: 177 
3116 014400 167574 167574 
3117 014402 137271 137271 
3118 014494 107675 107675 
3119 014406 000000 EEBTP2: 0 
3120 014410 000000 0 
3121 014412 00000 0 
3122 014414 000000 0 
3123 014416 177777 EEBBFO: ~1 
3124 014420 177777 -1 
3125 014422 177777 -1 
3126 014424 177777 -1 
3127 014426 177777 EEBBF1: ~1 
3128 014430 177777 -1 
3129 014432 177777 -1 
igo O14656 77797 -1 
3132 IF A TRAP TO 4 OCCURS COME HERE: 





1 


“amo 
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CKFPCCO FRIIF FLTG PNT PRT C MACRO M1113 O9=APR=81 13:53 PAGE 26-1 SEQUENCE 
TEST # 21 = SEE ABOVE COMMENT FOR TEST TITLE 


3133 014436 011602 EEB10: MOV (SP) ,R2 SEE IF THE TRAP OCCURRED ON THE TEST INSTR. 
3134 014440 020227 014340 CMP R2,AEEB2+2 
3735 014444 001405 BEQ 1$ ;BRANCH IF YES. 
| 3136 014446 020227 014342 CMP nee MEEBO+4 
3137 014452 001402 BEQ ;BRANCH_IF ri 
3138 014454 000137 047302 JMP tp SPUR ZOTHERWISE GO REPORT A SPURIOUS TRAP TO 4. 
| 3139 ;REPORT A FAILURE IN THE FDST FLOWS RESULTED IN AN ODD ADDRESS TRAP TO 4. 
3140 014460 022626 1$: CMP (SP)+,(SP)+ RESET THE STACK. 
3141 014462 010237 001236 MOV R2,$TMP2 
3142 014466 104107 2$: ERROR +107 ;ODD ADRES 
Sez 014470 000430 BR EEBDONE ;BUT FDST¥ IN ST 771 
314 ;REPORT RESULT INCORRECT. 


5 
3146 014472 


| 
| 012737 014406 001242 EEB15: MOV HEEBTP2, STMP4 

3147 014500 012737 014376 001240 MOV MEEBTP1,STMP3 

3148 014506 012737 014426 001244 MOV #EERBF1.$TMP5 

3149 014514 104073 1$: ERROR +73 BAD DATA X11*0 ST 312x 

sey 014516 000415 BR EEBDONE 

3152 ;RO INCORRECT: 

3153 014520 012737 014426 001240 EER20: MOV MEEBRF1,$TMP3 

3154 014526 010037 001242 MOV RO, $TMP4 

3155 014532 104074 i$: ERROR +74 zRO BADX 

as 014534 000406 BR EEBDONE 

3158 sREPORT FPS INCORRECT: 

3159 014536 010537 001240 FEB25: MOV R5,$7MP3 

3160 014542 012737 000204 001244 MOV #204, $TMP5 

42 014550 104075 1$: ERROR +75 sFPS xX 

3163 014552 EEBDONE : 

014552 104412 RSETUP :GO INITIALIZE THE FPS AND STACK; AND 

SEE IF THE USER HAS EXPRESSED 
: THE DESIRE TO CHANGE THE SOFTWARE . 
:VIRTUAL CONSOLE SWITCH REGISTER (HAS 

3164 : THE USER TYPED CONTROL G?). 

3165 sTEST TITLE:NEGF, ABSF AND TSTF SOURCE MODE 2 TEST 


68 


Liccpkusapeticpceses eae ace 


CKFPCCO FPIIF FLTG PNT PRT C 
TEST # 22 = SEE ABOVE COMMENT FOR TEST TITLE 


3166 


014554 


7 
3168 014556 
014556 


3178 014620 
3180 014626 
3182 014630 


014644 
014646 


014650 
014654 


SELES 


KARAVLS 
>) 
— 
> 
& 
a 


3206 

3207 014714 
3208 014716 
3209 014720 
3210 014722 
3211 014724 
3212 


000004 


104415 


012737 
170620 
170205 


177777 


014666 
014716 
000004 
000200 
014716 


014626 
014726 


014716 
000004 


014726 
000204 


E_ 6 
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001236 
000004 


-SBTTL TEST # 22 = SEE ABOVE COMMENT FOR TEST TITLE 


SS RAERKRAERAAEEEARREEREEREREEEAEEAREERRERRRORRAERAERRHARAARARAERRERERES 


TeTEST 22 SEE ABOVE COMMENT FOR TEST TITLE 


s*THIS IS A TEST THE NEGF, ABSF AND TSTF 
**SOURCE FLOWS. THE ABSD INSTRUCTION 
**1S USED TO TEST MODE 2 


* 
e 
MRR ARERESSASALASLERSE SERS SRS SRASSE SRR SERRA RR RR RRS RRR RRR RRR SRR RRS SS SD 


TST22: SCOPE 


FFB: 
LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
MOV #FFBTP1,RO SET UP THE DATA BUFFER. 
MOV #FFRBBF1,R1 
MOV #4,R2 
1$: MOV (RO) +, (R1)+ 
SOB R2,1$ 
MOV #200,R0 SET FD. 
LDFPS RO 
MOV #FFBBRF1,RO ;SET UP THE OPERAND ADDRESS. 


MOV #FFB2,$TMP2 
MOV #FFBIO,ERRVECT ;SET UP VECTOR 4 IN CASE OF AN ERROR. 


FFB2:  ABSD (RO) + 7 TEST INSTRUCTION. 


STFPS RS :GET FPS. 
MOV #FFBBF1,R1 =CHECK RESULT. 
MOV #4,R2 
1$: TST (R1)+ 
BNE FFR15 :BRANCH IF INCORRECT. 
SOB R2,1$ 
CMP RO,#FFBBF1+10  :IS RO CORRECT? 
BNE FFB20 ‘BRANCH IF INCORRECT. 
CMP #204,R5 ‘1S THE FPS CORRECT? 
BNE FFR25 ‘BRANCH IF INCORRECT. 
BR F FBDONE 
: THESE ARE TEST DATA TABLES AND DATA BUFFER. 
FFRIP1: 177 
167574 
137271 
107675 
FFRBTP2: 0 
0 
0 
0 
FFBRFO: =1 
of 
a} 
-1 
FFBBFI1: =1 


69 
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TEST # 22 = SEE ABOVE COMMENT FOR TEST TITLE 


SEQUENCE 70 


3213 i A TRAP T0 4 the COME HERE. 
3214 014726 011602 B10: MOV (SP) ,Re SEE IF THE TRAP OCCURRED ON THE TEST INSTRUCTION. 
3215 014730 020227 014630 CMP 


Ree ,AFFB2+2 


3216 014734 001405 BEQ :BRANCH IF YES. 

3217 014736 020227 014632 CMP nee AFFB2+4 

3218 014742 0014 BEQ ;BRANCH IF YES. 

3219 014744 000137 047302 JMP CPSPUR s OTHERWISE GO REPORT SPURIOUS TRAP TO 4. 

3220 sREPORT AN FDST FLOW FAILURE RESULTED IN A TRAP TO 4. 

3221 014750 022626 1$: CMP (SP)+,(SP)+ 

3222 014752 010237 001236 MOV R2,$TMP2 

3223 014756 104076 2$: ERROR +76 :0DD ADRES 

$559 014760 000430 is \s1 F F BDONE *BUT FDSTX IN ST 771 

3226 sREPORT RESULT INCORRECT: 

3227 014762 012737 014676 001240 FFBIS5: MOV #FFBIP2,$TMP3 

3228 014770 012737 014666 001242 MOV #FFRIP1,STMP4 

3229 014776 012737 014716 001244 MOV #FFRBF1.$TMPS 

3230 015004 104077 1$: ERROR +77 ;BAD DATA X11*0 ST 312k 

Se 015006 000415 fhe F FBDONE 

3233 ;REPORT RO INCORRECT: 

3234 015010 012737 014722 001240 FFR20: MOV MF FBRF1+4,$1TMP3 

3235 015016 C10037 901242 MOV RO, $TMP4 

3236 015022 104100 1$: ERROR +100 3RO BADX 

See 015024 000406 R F FBDONE 

3239 REPORT FPS INCORRECT: 

3240 015026 010537 001240 FFB25: MOV R5,$TMP3 

3241 015032 012737 0002046 001244 MOV #204,$TMP5 

eck 015040 104101 1$: ERROR +101 FPS Xx 

3244 015042 F F BDONE : 

015042 104412 RSE TUP 3;GO INITIALIZE THE FPS AND STACK; AND 
:SEE IF THE USER HAS EXPRESSED 
: THE DESIRE TO CHANGE THE SOF TWARE 
nes CONSOLE SWITCH REGISTER (HAS 
: USER TYPED CONTROL G?). 
3245 ZTEST TITLE:NEGF, ABSF hy TSTF SOURCE MODE 4 TEST 
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CKFPCCO FRTIF FLTG PNT PRT C MACRO M1113 O9=APR=-81 13:53 PAGE 28 SEQUENCE 
TEST # 23 = SEE ABOVE COMMENT FOR TEST TITLE 


3246 ~-SBTTL TEST # 23 = SEE ABOVE COMMENT FOR TEST TITLE 


TROP P PRESSE RS ESS SEER ERE RRR ERR SASSER RRS ER RRR RRR SRR RRR RRR RRR RAR RRO OD 


:STEST 23 SEE ABOVE COMMENT FOR TEST TITLE 
;*THIS , A TEST THE NEGF, ABSF AND TSTF 
*SOURCE FLOWS. THE ABSD INSTRUCTION 

+15 USED TO TEST MODE 4 


2 Oe Se ee TT ON Eee ee NO 


ote 015044 000004 1S723: SCOPE 

3248 015046 GGB1: 
j 0150466 104415 LPERR SET UP THE LOOP ON ERROR ADDRESS. 
8249 015050 012700 015156 MOV #GGBTP1,RO :SET UP THE DATA BUFFER. 
3250 015054 012701 015176 MOV #GGBBFO.R1 
| 3251 015060 012702 000004 MOV #4 R2 

3252 015064 012021 1$: MOV (RO) +, (R1)+ 
3253 015066 077202 SOB R2,1$ 
| 3254 015070 012700 000200 MOV #200,RO SSET FD. 

3255 015074 170100 LDFPS RO 
| 3356 015076 012700 015206 MOV #GGBBF 1,RO :SET UP THE OPERAND ADDRESS. 

3257 015102 012737 015116 001236 MOV #GGB2,$TMP2 
3258 015110 012737 015216 000004 MOV #GGB10,ERRVECT :SET UP VECTOR 4 IN CASE OF AN ERROR. 
| P 
| e508 015116 170640 GGB2:  ABSD -(RO) TEST INSTRUCTION. 
| 3262 015120 170205 STFPS RS :GET FPS. 

3263 015122 012701 015176 MOV #GGBBFO,R1 ZCHECK RESULT. 
| 3264 015126 012702 000004 MOV #4 RO 
| 3265 015132 005721 1$: TST (RI)+ 

3266 015134 001046 BNE GGB15 :BRANCH IF INCORRECT. 

5267 015136 077203 SOB R2,1$ 

3269 015140 020027 015176 CMP RO, A#GGBBF 0 :1S RO CORRECT? 

3270 015144 001055 BNE GGB20 ;BRANCH IF INCORRECT. 

3271 015146 022705 000204 CMP #204,R5 :1S THE FPS CORRECT? 

3272 015152 001061 BNE GGB25 ‘BRANCH IF INCORRECT. 

3073 015154 000460 BR GGBDONE 

3275 : THESE ARE TEST DATA TABLES AND DATA BUFFER. 

3276 015156 000177 GGBIP1: 177 

3277 015160 117273 117273 

3278 015762 147576 147576 

3379 015164 177071 177071 

3280 015166 000000 GGBTP2: 0 

3281 015170 000000 0 

3282 015172 000000 0 
| 3283 015174 000 0 

3284 015176 177777 GGBBFO: <1 

3285 015200 177777 -1 

015202 177777 at 
015204 177777 =] 

3288 015206 177777 GGBBF1: =1 

3289 015210 177777 =] 

3290 015212 177777 — 

3291 015214 177777 e 


71 


cree FPTIF FLTG PNT PRT 
ST # 23 = SEE ABOVE COMMENT FOR TEST TITLE 


6 
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SEQUENCE 


3293 :IF A TRAP TO 4 Occurs COME HERE. 
3294 015216 011602 6GB10: MOV R2 ZSEE IF THE TRAP OCCURRED ON THE TEST INSTRUCTION. 
3295 015220 020227 015120 CMP Re, PneCh2+2 
3296 015224 001405 BEQ BRANCH IF YES. 
3297 015226 020227 015122 CMP Re. #GGB2+4 
3298 015232 001402 BEQ sBRANCH IF YES. 
3299 015236 000137 047302 JMP a ZOTHERWISE GO 2EPORT SPURIOUS TRAP TO 4. 
3300 :REPORT AN FDST FLOW FAILURE RESULTED IN A TRAP TO 4 
3301 015240 022626 i$: CMP (SP)+, (SP) + 
3302 015242 010237 001236 MOV R2,$TMP2 
3303 015246 104102 2$: ERROR +102 :ODD ADRES 
| 3304 015250 000430 BR GGBDONE ‘BUT FDSTX IN ST 771 
| 3306 :REPORT RESULT INCORRECT 
3307 015252 012737 015166 001240 GGB15: MOV GBTP2, $TMP3 
| —- 8308 015260 012737 015156 001242 MOV CCBTPT. $TMP4 
| 3309 015266 012737 015176 001244 MOV #GGBBF 0. $TMPS 
3310 015274 104103 1$: ERROR +103 :BAD DATA X11#0 ST 312K 
3311 015276 000415 BR GGBDONE 
| 3213 :REPORT RO INCORRECT: 
| 3314015300 012737 075176 001240 6G820: #GGBBF 01, $TMP3 
3315 015306 610037 901242 MOV RO, $TMP4 
3316 015312 104106 1$: ERROR +104 :RO BADX 
3317 015314 0004606 BR GGBDONE 
3319 :REPORT FPS INCORRECT: 
3320 015316 010537 001240 6GB25: MOV R5,$TMP3 
3321 015322 012737 000204 001244 MOV #204, $TMP5 
3322 015330 104105 1$: ERROR +105 FPS Xx 
3324 015332 GGRDONE : 
015332 104412 RSE TUP :GO INITIALIZE THE FPS AND STACK; AND 
‘SEE IF THE USER HAS EXPRESSED 
‘THE DESIRE TO CHANGE THE SOF TWARE 
;VIRTUAL CONSOLE SWITCH REGISTER (HAS 
THE USER TYPED CONTROL G?) 
:TEST TITLE:NEGF. ABSF AND TSTF SOURCE MODE 3 TEST 


3325 
| 
| 


72 


[on 


peetvee FRITF FLTG PNT PRT C 
S$’ # 26 = SEE ABOVE COMMENT FOR TEST TITLE 


3326 


015334 

3327 
3328 015336 
5336 


3337 015372 
thes 015400 


3340 015406 
3342 015410 


3351 015442 
3352 015444 
3353 

3354 

3355 015446 
3356 015450 
3357 015452 
3358 015454 
3359 015466 
3360 015476 
3361 015500 
3362 015502 
3363 015504 
3 015506 
3365 015510 
3 015512 
3367 015514 
3368 

369 

3370 16 


o15939 
170630 


170205 
012701 


177777 


011602 
020227 
001405 


015446 
015476 
000010 
000200 
015506 


015406 
9015516 


015476 
000004 


015510 
000204 


015476 
000000 


015410 
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001236 
000004 


177777 
000000 


-SBTTL TEST # 24 = SEE ABOVE COMMENT FOR TEST TITLE 


Went A eee eee RRR RRR RR RRR RRR RR RRRRRRE RRR RRR RRR RRR RRR RRR RRS ESRD SE SD | 


:*TEST 24 SEE ABOVE COMMENT FOR TEST TITLE 


I eTHIS - A TEST THE NEGF, ABSF AND TSTF 
[*SOURCE FLOWS. THE ABSD INSTRUCTION 
>*1S USED 70 TEST MODE 3 

** 


Webbe eRe RRR RRR RRR RRR RR RRR RRR RRR RRR RRR RR RRR RRR RRR RRS RRR RR RRS SE DS 


TST24: SCOPE 


HHB 1 : 
LPERR SET UP THE LOOP ON ERROR ADDRESS. 
MOV #HHBTP1,RO sSET UP THE DATA BUFFER. 
MOV #HHBBFO,R1 
MOV #10,R2 
1$: MOV (RO) +,(R1)+ 
SOB R2,1$ 
MOV #200,R0 sSET FO. 
LDFPS RO 


MOV aes atnee ;SET UP THE OPERAND ADDRESS. 
MOV #HHB10,ERRVECT ;SET UP VECTOR 4 IN CASE OF AN ERROR. 
HHB2:  ABSD @(RO)+ i TEST INSTRUCTION. 


STFPS R5 :GET FPS. 
MOV #HHBRF 0 ,R1 s CHECK RESULT. 
MOV M4 ,R2 

1$: TST (R1)+ 
BNE HHB15 ;BRANCH IF INCORRECT. 
SOB R2,1$ 
CMP RO, AHHBBF 1+2 :1S RO CORRECT? 
BNE HHB20 ;BRANCH IF INCORRECT. 
MP #204,R5 :1S THE FPS CORRECT? 
BNE HHB25 ;BRANCH IF INCORRECT. 
BR HHBDONE 

s THESE ARE TEST DATA TABLES AND DATA BUFFER. 

HHBT P1: 177 
147576 
177071 


107576,HHBBFO,-1,-1,-1 
HHBTP2: 0,0,0,0 
HHBBFO: =1 


HHBBF1: =1 


;1F A TRAP TO 4 OCCURS COME HERE. 


HHB10: MOV (SP) ,R2 SEE IF THE TRAP OCCURRED ON THE TEST INSTRUCTION, 


CMP R2,A4HHB2+2 
BEQ 1$ :BRANCH IF YES. 





73 


——————--——___-- 


CKFPCCO FRIIF FLTG PNT PRT C 
TEST # 24 = SEE ABOVE COMMENT FOR TEST TITLE 


3373 015526 


3374 
3375 
6 


$400 


015532 
015534 


015632 
015632 


020227 
001402 
000137 


022626 
010237 


012737 
010037 
104111 
000406 


010537 


012737 
104112 


104412 


015412 
047302 


001236 
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REPORT 
1$: 
28: 


REPORT 
001240 HHB15: 
001242 
001244 

1$: 


ZREPORT 
001240 HHB20: 
1$: 
REPORT 
HHB25: 
001244 
1$: 


HHBDONE : 


CMP Ree AHHB2 +4 


;BRANCH IF YES. 
THERWISE GO REPORT SPURIOUS TRAP TO 4. 


JMP 
~~ FLOW FAILURE RESULTED IN A TRAP TO 4. 


BEQ 
CPSPUR 30 
(SP) +, (SP) + 
MOV R2, $TMP2 
ERROR +106 
BR HHBDONE 


~ tae INCORRECT: 


:ODD ADRES 
;BUT FDSTX IN ST 771 


#HHBTP2 , STMP3 
MOV #HHBTP1 ,STMP4 
MOV #HHBBF 0, $TMPS 


ERROR +110 ;BAD DATA Xi1*0 ST 3127 
BR HHBDONE 

RQ INCORRECT: 

MOV Aes $STMP3 

MOV RO,$TMP 

ERROR +111 RO INCORRECT. 

BR HHBDONE 

FPS INCORRECT: 

MOV R5,$1TMP3 

MOV #204, $TMPS 

ERROR +112 iF PSX 

RSE TUP 3GO INITIALIZE THE FPS AND STACK; AND 


TEST TITLE :NEGF, 


7 SEE IF THE USER HAS EXPRESSED 
3; THE DESIRE TO CHANGE THE SOFTWARE 
ZVIRTUAL CONSOLE SWITCH REGISTER (HAS 
;THE USER TYPED CONTROL G?). 

ABSF AND TSTF SOURCE MODE 5 TEST 


74 


6 
| ae FP1IF FLTG PNT PRT MACRO M1113 O9=APR=81 13:53 PAGE 50 SEQUENCE 75 
TEST # 25 = SEE ABOVE COMMENT FOR TEST TITLE 


3401 -S8TTL TEST # 25 = SEE ABOVE COMMENT FOR TEST TITLE 


SEAR RAAREAERRERAKARERRAERARERRAARAARRKORARARRRERARRRAKARERRERARAR 


| SeTEST 25 SEE ABOVE COMMENT FOR TEST TITLE 

:*THIS IS A TEST THE NEGF, ABSF AND TSTF 
S*SOURCE FLOWS. THE NEGD INSTRUCTION 

t*1S USED TO TEST MODE 5 


. 
MORRO ERAAEARASL ALES SS SSSR RS RS ES RSE RRR RRS RRR RRR RRR RRR RRR R RRR RRS SS SD 


~ 015634 000004 1$T25: SCOPE 
| 3403 015636 11B1: 
| 015636 10441 LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
3404 015640 012700 015746 MOV #1 IBTP1,RO ;SET UP THE DATA BUFFER. 
3405 015644 012701 015776 MOV #1 IRBFO.R1 
| 3406 015650 012702 000010 MOV #10,R2 
3407 015654 012021 1$: MOV (ROS +, (R1)+ 
| 3408 015656 077202 SOB R2,1$ ; 
3409 015660 012700 000200 MOV #200,RO :SET FD. 
3410 015664 170100 LDFPS RO 
3411 015666 012700 016010 MOV #1 1BBF1+2,R0 ;SET UP THE OPERAND ADDRESS. 
3412 015672 012737 015706 001236 MOV #11B2,$TMP2 
3415 015700 012737 016016 000004 MOV #IIBIO,ERRVECT ;SET UP VECTOR 4 IN CASE Of AN ERROR. 
Sia 015706 170750 TIBe: NEGD a- (RO) TEST INSTRUCTION. 
3417 015710 170205 STFPS RS :GET FPS. 
3418 015712 012701 015776 MOV #1 IBBFO,R1 [CHECK RESULT. 
3419-015716 012702 000004 MOV #4 ,R2 
3420 015722 005721 1$: TST (Ri)+ 
3421 015724 001052 BNE 11B15 :BRANCH IF INCORRECT. 
3422 015726 077203 SOB R2,1$ 
3423 015730 020027 016006 CMP RO. #1 IBBF1 :1S RO CORRECT? 
3424 015734 001061 BNE 11820 “BRANCH IF INCORRECT. 
3425 015736 022705 000204 CMP #204,R5 ‘1S THE FPS CORRECT? 
3426 015742 001065 BNE 11B25 “BRANCH IF INCORRECT. 
347 015744 000472 BR 1 IBDONE 
3429 ; THESE ARE TEST DATA TABLES AND DATA BUFFER. 
3430 015746 000176 [IBTP1: 176 
3431 015750 177074 177074 
3432 015752 127374 127374 
3433 015754 157677 015776 177777 157677, 1 1BBFO,-1,-1,-1 
3434 015766 000000 IIBTP2: 0 
3435 015770 000000 0 
3436 015772 000 0 
3437 015774 000000 0 
3438 015776 177777 LIBBFO: =1 
3439 016000 177777 a 
3440 016002 177777 wf 
3441 016004 177777 -1 
3442 016006 177777 LIBBF1: -1 
3443 016010 177777 of 
3444 016012 177777 : of 
3445 016014 177777 of 








Beige FPI1IF FLTG PNT PRT C 


6 
MACRO M1113 O9=APR=81 13:53 PAGE 30-1 


ST # 25 = SEE ABOVE COMMENT FOR TEST TITLE 


3448 016016 011602 


000415 


00 012737 
06 010037 
12 104115 
14 000406 


4 
6116 010537 


012737 
104116 


104412 


015710 
015712 
047302 


001236 


016006 
001242 


001240 
000204 


001240 
001242 
001244 


001240 


001244 


11B10: 


REPORT 
1$: 

2s: 
;REPORT 
11B15: 
1$: 


ZREPORT 
11B20: 
1$: 


:REPORT 
11B25: 


1$: 


I IBDONE : 


MOV (SP) ,R2 
CMP — 
BEQ 1$ 

CMP +t AIL IB2+4 
BEQ 1$ 


JMP CPSPUR 
AN FDST FLOW FAILURE RESULTED 
CMP (SP)+, (SP)+ 
MOV R2,$TMP2 
ERROR +113 
BR I IBDONE 
RESULT ety 
MOV BIP2,$TMP3 


MOV PIIBIPY. $STMPS 
MOV #1 IBBFO,$TMPS 
ERROR +114 

BR I IBDONE 


RO INCORRECT: 

MOV #1 1BBF1,$1MP3 
MOV RO, $TMP4 
ERROR +115 

BR I IBDONE 

FPS INCORRECT: 

MOV R5,$TMP3 

MOV #204, $TMP5 
ERROR +116 


RSETUP 


SEQUENCE 76 


3SEE IF THE TRAP OCCURRED ON THE TEST INSTRUCTION. 
;BRANCH IF YES. 


;BRANCH IF YES. 
SOTHERWISE GO REPORT SPURIOUS TRAP TO 4. 


iN A TRAP TO 4. 


;ODD ADRES 
;BUT FDSTX IN ST 771 


BAD DATA X11*0 ST 3127 


7RO BADX 


sFPSX 


3GO INITIALIZE THE FPS AND STACK; AND 
;SEE IF THE USER HAS EXPRESSED 

THE DESIRE TO CHANGE THE SOFTWARE 
;VIRTUAL CONSOLE SWITCH REGISTER (HAS 
; THE USER TYPED CONTROL G?). 


 OOEEEEOEEEEEEOEOOOOOOOEOOEOOEEEeeeeeeeeeeeeee—eeee—e 


3478 


016134 
9 


oes 016206 


3504 016246 
3505 
3506 
3507 016250 
3508 016252 
3509 016254 
3510 016256 
3511 016262 
3512 016264 
3513 016266 
3514 016270 
3515 016272 
3516 016274 
3517 016276 
3518 016300 
3519 016302 
3520 016304 
3521 016306 
016310 


WAG 
Ww 
Morr 
wr 


CKFPCCO FP11F FLTG PNT 
TEST # 26 = NEGF, 


ABSF 


000004 


012767 
170660 
170205 


177777 


PRT C 


016250 
016272 
000004 


000200 
016263 
016206 
016312 
000007 


016272 
000004 


016263 
000204 


000000 


M 6 
MACRO M1113 O9=APR=81 13:53 PAGE 31 
AND TSTF SRC MODE 6 TEST 


SEQUENCE 


.SBTTL TEST # 26 = NEGF, ABSF AND TSTF SRC MODE 6 TEST 


TPR PSSSASASASSSLESLSSSS ESE RSRSS RRS SSR RSS SSS SRSA RRR RRR RRA SASS SARA SSS 


Z*TEST 26 NEGF, ABSF AND TSTF SRC MODE 6 TEST 


« 

z*THIS IS A TEST THE NEGF, ABSF AND TSTF 
;*SOURCE FLOWS. THE ABSD INSTRUCTION 
;*IS USED TO TEST MODE 6 

** 


SAAR ERERERERREERERKEEEEEEERIRERERERARRARERERAERREER 


TST26: SCOPE ’ 
BI -DSABL AMA ;DISABLE MODE 6 TO MODE 3 CONVERSIONS 
JJB1: 
LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
V #JJBTP1,RO 7SET UP THE DATA BUFFER. 
MOV #JJBBFO,R1 
MOV #4,R2 
1$: MOV (RO) +, (R1)+ 
SOB R2,1$ 
MOV #200,R0 sSET FD. 
LDFPS RO 
MOV #JJBBFO-7,RO0 :SET UP THE OPERAND ADDRESS. 
MOV #JJB2,STMP2 
MOV #JJB1IO,ERRVECT ;SET UP VECTOR 4 IN CASE OF AN ERROR. 
IJB2: ABSD 7(RO) ZTEST INSTRUCTION. 
STFPS R5 sGET FPS. 
MOV #JJBBFO,R1 CHECK RESULT. 
MOV #4 ,R2 
1$ TST (R1)+ 
BNE JJB15 ;BRANCH IF INCORRECT. 
SOB R2,1$ 
CMP RO,AJJBBFO-7 31S RO CORRECT? 
BNE JJyB15 ;BRANCH IF INCORRECT. 
CMP #204,R5 71S THE FPS CORRECT? 
BNE JJB20 :BRANCH IF INCORRECT. 
J JBDONE 
; THESE ARE TEST DATA TABLES AND DATA BUFFER. 
JJBTP1: 177 
161524 
131273 
107174, 
JJBTP2: 0 
0 
0 
0 
JJBBF 0: . 
-1 
-1 
JJBBF1: =1 


77 


c---- 


i 
| 
| 


3525 016312 


3530 016330 
3531 

3532 016334 
3533 016336 
3534 016342 
3535 016344 
3536 

3537 

3538 016346 
3539 016354 
3540 016362 
3821 0°6390 
a 016372 


4 
3545 016374 


016426 


3554 


bse FPI1IF FLTG PNT P 
ST # 26 = NEGF, ABSF 


011602 


000430 


012767 
012767 
012767 
104120 
000415 


012767 
010567 


012767 
104122 


104412 


6 
MACRO a ies a 13:53 PAGE Se 1 


TC 
AND TSTF SRC MODE 6 T 


076210 
016212 
030746 


162674 


016262 


016250 
016272 


016263 
162634 


162622 
000204 


162664 
162660 
162654 


162636 


162620 


JJB10: 


;REPORT 
1$: 
2s: 


;REPORT 
JJB15: 


1$: 
;REPORT 
JJB20: 


1$: 


*REPORT 
JJB25: 


18: 
JJBDONE : 


MOV (SP), 


R2 
CMP rf AJ JB2+2 
CMP Re. AJ IB2+4 
CPSPUR 


SEQUENCE 78 


SEE IF THE TRAP OCCURRED ON THE TEST INSTRUCTION. 
;BRANCH IF YES. 
BRANCH iF YES 


;OTHERWISE GO REPORT SPURIOUS TRAP TO 4. 


JMP 
— FLOW FAILURE RESULTED !N A TRAP T 


(SP) + 


MOV Re, ,STMPe 


ERROR +11 
BR 


JJBDONE 


RESULT INCORRECT: 

MOV MJ IBTP2,STMP3 

MOV M#JJIBTP1,STMPS 
#J JBBF 0, $TMP5 


MOV 
ERROR +120 
BR 


JJBDONE 


RO INCORRECT: 
MOV 


#J JBBF 0-7 ,$TMP3 
RO, $TMP4 


MOV 
ERROR +124 


R 

FPS INCORRECT: 
MOV R5,$TMP 
MOV #204, $TMPS5 
ERROR +122 


RSE TUP 


-ENABL AMA 


;ODD ADRES 
;BUT FDSTX IN ST 771 


;BAD DATA X11*0 ST 3127 


RO BADX 


3 FPSX 


3GO INITIALIZE THE FPS AND STACK; AND 
[SEE IF THE USER HAS EXPRESSED 


THE DESIRE TO CHANGE THE SOFTWARE 


;VIRTUAL CONSOLE SWITCH REGISTER (HAS 
THE USER TYPED CONTROL G?). 
SREENABLE MODE 6 TO MODE 3 CONVERSIONS 


» 
CKFPCCO FRTIF FLTG PNT PRT C MACRO is Ms lee 13:53 PAGE 82 SEQUENCE 79 Cl 
TEST # 27 = NEGF, ABSF AND TSTF SRC MODE 7 mW 


| 
| 3555 .SBTTL TFST # 27 = NEGF, ABSF AND TSTF SRC MODE 7 TEST 
| 
| 


*-Reeeke REE EHO RARER RERREREREERP RHEE EH 


;*TEST 2 NEGF, ABSF AND TSTF SRC MODE 7 TEST 


THIS IS +» EST THE NEGF, ABSF AND TSTF 
t*SOURCE FLOWS. THE ABSD INSTRUCTION 
#18 USED TO TEST MODE 6 


Ps 
4 pGeebenewebniiidibnbhendeabanianeethmeseeaannneaeannnetts 


$556 016430 000004 1$127: SCOPE 

3557 016432 KKBI1: 
016432 10441 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 

3558 016434 012700 016544 MOV #KKBTP1,RO ;SET UP THE DATA BUFFER. 

3559 016440 012701 016574 MOV #KKBBFO,R1 

3560 016444 012702 000010 MOV #10,R2 

3561 016450 012021 1$: MOV (RO)+,(R1)+ | 

3562 016452 077202 SOB R2,1$ 

3563 016454 012700 000200 MOV #200,R0 SET FD. 

3564 016460 170100 LDFPS RO 

3565 016462 012700 016575 MOV AKKBBF 1-7,RO0 ;SET UP THE OPERAND ADDRESS. 


| 
3566 016466 012737 016502 001236 MOV #KKB2,$TMP2 
3567 016474 012737 016614 000004 MOV #KKB10,ERRVECT ;SET UP VECTOR 4 IN CASE OF AN ERROR. 
3569 016502 170770 000007 KKB2: NEGD  @7(RO) : TEST INSTRUCTION. 
3571 016506 170205 STFPS RS :GET FPS. 
3572 016510 012701 016574 MOV #KKBBFO,R1 [CHECK RESULT. 
3573 016514 012702 O00W « MOV #4 Re 
3574 016520 005721 1$: TST (Ri)+ 
3575 016522 001052 BNE “eh ;BRANCH IF INCORRECT. 

3577 016526 020027 016575 CMP RO.AKKBBF1-7  :IS RO CORRECT? 

3578 016532 001061 BNE KkB20 ;BRANCH IF INCORRECT. 

3579 016534 022705 000204 CMP #204,R5 ‘IS THE FPS CORRECT? 

3580 016540 001056 BNE KKB20 ‘BRANCH IF INCORRECT. 

3581 016542 000472 BR KKBDONE 

3583 : THESE ARE TEST DATA TABLES AND DATA BUFFER. 

3584 016544 000177 KKBIP1: 177 

3585 016546 167574 167574 


137271 
3587 016552 107675 016574 177777 107675 ,KKBBFO,-1,-1,71 
88 016564 aia sae KKBTP2: 


3592 016574 177777 KKBBFO: 1 


3596 016604 177777 KKBBF1: <1 


99 016612 177777 -4 


---- - -- --—_—- — -— — 


CKFPCCO FRPIIF FLTG PNT PRT C MACRO M1113 pkg 13:53 PAGE $3.4 SEQUENCE 80 
| TEST # 27 = NEGF, ABSF AND TSTF SRC MODE 7 TES 
3602 016614 011602 KKB10: MOV (SP) ,R2 SEE IF THE TRAP OCCURRED ON THE TEST INSTRUCTION. 
3603 016616 020227 016504 CMP Ree AKKB2+2 
3604 016622 001405 BEQ 1$ ;BRANCH IF YES. 
3605 016624 020227 016506 CMP Ree AKKB2+4 
3606 016630 001402 BEQ i$ ;BRANCH IF YES. 
3607 016632 000137 047302 JMP CPSPUR ;OTHERWISE GO REPORT ge ae TRAP TO 4. 
:REPORT AN FDST FLOW FAILURE RESULTED IN A TRAP TO 4, 
3609 016636 022626 1$: CMP (SP)+, (SP)+ 
3610 016640 010237 001236 MOV R2,$TMP2 
3611 016644 104123 23: ERROR +123 ;ODD ADRES 
slg 016646 000430 BR KKBDONE ;BUT FDSTX IN ST 771 
3614 REPORT RESULT INCORRECT: 
3615 016650 012737 016564 001240 KKB15: MOV AKKBTP2, $TMP3 
3616 016656 012737 016544 001242 MOV AKKBTP1 ,STMP4 
3617 016664 012737 016574 001244 #KKBBF O,$TMPS 
3618 BAD DATA X11*0 ST 3127 


3621 ;REPORT ~& INCORRECT: 

3622 016676 012737 016575 001240 KkB20: ee a -7,$TMP3 
3623 016704 010037 001242 MOV RO,$ 

3624 016710 104125 1$: “poe M38 


B KKBDONE 
3626 :REPORT FPS INCORRECT: 
3627 016714 010537 001240 KKB25: MOV R5,$7MP3 
3628 016720 012737 000204 001244 MOV #204 ,$TMP5 
3629 016726 104126 1$: ERROR +126 


3631 016730 KKBDONE : 


| 
| MOV 
016672 104124 1$: ERROR +124 
3619 016674 000415 BR KKBDONE 
016730 104412 RSETUP 


RO BADX 


sFPSxX 


:GO INITIALIZE THE FPS AND STACK; AND 
:SEE IF THE USER HAS EXPRESSED 

7 THE DESIRE TO CHANGE THE SOF TWARE 
:VIRTUAL CONSOLE SWITCH REGISTER (HAS 
3 THE USER TYPED CONTROL G?). 


_SKEPCCO FPIIF FLTG PNT PRT C 


TEST # 30 = NEGF, 


3632 


016732 


066 
3672 017070 
3673 017072 


5 

76 017074 
3677 017076 
3678 017102 


MACRO M1113 Bs eta -81 13:53 PAGE Bs 


SEQUENCE 


ABSF AND TSTF SRC MODE 6, 


012767 
170767 
170205 


017034 


00020C 


017000 
017074 
000050 


017054 
000004 


000204 


017002 


162244 
161004 


.SBTTL TEST # 30 = NEGF, ABSF AND TSTF SRC MODE 6, GR7 


RRR ERE AEE REE REE EERERIRERHEERARRAEEEEEHEHEREA ERED 


: TEST 30 NEGF, ABSF AND TSTF SRC MODE 6, GR7 


‘THIS 1S. A TEST THE NEGF, ABSF AND TSTF 
‘*SOURCE FLOWS. THE NEGD INSTRUCTION 
p15 USED TO TEST MODE 6 


Ps 
a anabebinnaieniatin dda itaamnnabaaite binimnedeehmnanabesneannth 


18130: SCOPE 
81 -DSABL AMA ;DISABLE MODE 6 TO MODE 3 CONVERSIONS 
Ligis 
LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
V #LLBTP1,RO 7SET UP THE DATA BUFFER. 
MOV #LLBBFO,R1 
MOV #4 ,R2 
1$ MOV (RO)+,(R1)+ 
SOB R2,1$ 
MOY #200,R0 ;SET FD. 
LDFPS RO 
MOV #LLB2,$TMP2 
MOV #LLB10O,ERRVECT ;SET UP VECTOR 4& IN CASE OF AN ERROR. 
LLB2: NE GD LLBBF 0 ;TEST INSTRUCTION. 
STFPS R5 ;GET FPS. 
MOV #LLBRFO,R1 s CHECK RESULT. 
MOV #4,R2 
1$ TST (R1)+ 
BNE LLB15 ;BRANCH IF INCORRECT. 
SOB R2,1 
CMP #204,R5 :1S THE FPS CORRECT? 
BNE LLB25 *BRANCH IF INCORRECT. 
BR LLBDONE 
: THESE ARE TEST DATA TABLES AND DATA BUFFER. 
'LBTP1: 127 
137475 
147372 
117057 
LLBTP2: 0 
0 
0 
0 
LLABBFO: . 
-1 
-1 
LLBBF1: =1 


71F A TRAP TO 4 ‘Sk HERE . 


LLB10: MOV (SP sSEE IF THE TRAP OCCURRED ON THE TEST INSTRUCTION, 
CMP R2,A#LLB2+2 


BEQ 1$ BRANCH IF YES. 


81 


7 
CKEFPCCO FRIIF FLTG PNT PRT C MACRO M1113 O09=APR=-81 13:53 PAGE B30) SEQUENCE 82 
TEST # 30 = NEGF, ABSF AND TSTF SRC MODE 6, GR7 


3679 017104 020227 017004 CMP R2,ALLB2+4 
380 017110 001402 BEQ 1$ ;BRANCH IF YES. 
3681 017112 000167 030164 JMP CPSPUR ;OTHERWISE GO REPORT SPURIOUS TRAP TO 4. 
3682 ;REPORT AN FDST FLOW FAILURE RESULTED IN A TRAP TO 4, 
3683 017116 022626 4$: CMP (SP) +, (SP) + 
3684 017120 010267 162112 MOV R2,$TMP2 
3685 017124 104127 2$: ERROR +127 Z0DD ADRES 
ey 017126 000421 oie LLBDONE ;BUT FDSTX IN ST 771 
3688 yREPORT RESULT INCORRECT: 
| 3689 017130 012767 017044 162102 {LR15: MOV #LLBTP2, $TMP3 
| —- 39D 017136 012767 017034 162076 MOV ALLBTP1,$TMP4 
| 3691 017144 «012767 +=017054 162072 MOV #LLBBFO,$TMP5 
3692 017152 104130 1$: ERROR +130 sBAD DATA x11#0 ST 3127 
3693 017154 000406 BR LLBDONE 
3694 sREPORT FPS INCORRECT: 
3695 017156 010567 162056 LLB25: MOV RS, $TMP3 
3696 017162 012767 000204 162054 MOV #204, $TMP5 
3697 017170 104131 1$: ERROR +131 sF PSX 
3699 017172 LLBDONE : 
017172 104412 RSE TUP :G0 INITIALIZE THE FPS AND STACK: AND 
>SEE IF THE USER HAS EXPRESSED 
:THE DESIRE TO CHANGE THE SOFTWARE 
SVIRTUAL CONSOLE SWITCH REGISTER (HAS 
:THE USER TYPED CONTROL G?). 
.ENABL AMA ;REENABLE MODE 6 TO MODE 3 CONVERSIONS 





-~r? 


-—-—- 


CKFPCCO FRITIF FLTG PNT 
TEST # 31 = NEGF, ABSF 


3701 


2 
3703 


017174 
017176 


017234 


3 
017242 


017246 


017274 


017276 


012737 
012737 


170677 
170205 


177777 


011602 
020227 
001405 


PRT C 


017276 
017326 
000010 


000200 
017242 
017346 
000070 


017326 
000004 


000204 


017326 


017244 


ie, 
MACRO M1113 O9=APR=-81 13:53 PAGE 34 SE QUEMSCE 
AND TSTF SRC MODE 7, GR7 


0012306 
000004 


177777 


.SBTTL TEST # 31 = NEGF, ABSF AND TSTF SRC MODE 7, GR7 


POPP PEPPER ESSSESESESE SERRE RRR SERRE RRR RR ARERR RRR ARRAS RRR RRR RA SRR DSL 


TeTEST 31 NEGF, ABSF AND TSTF SRC MODE 7, GR7 


‘*THIS IS A TEST THE NEGF, ABSF AND TSTF 
‘*SOURCE FLOWS. THE ABSD INSTRUCTION 
**1S USED TO TEST MODE 7 


2 sRRARAERAAARARAEAAERAREREREERAAERAAARAARAAARRARERARARATREREAAERERD 


TS131: SCOPE 


MMB: 
LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
MOV AMMBTP1,RO ;SET UP THE DATA BUFFER. 
MOV #MMBBFO,R1 
MOV #10,R2 
1$: MOV (RO) +,(R1)+ 
SOB R2,1$ 
MOV #200,RO0 sSET FD. 
LDFPS RO 


MOV MMB , STMP2 
MOV #MMB10,ERRVECT ;SET UP VECTOR 4 IN CASE OF AN ERROR. 


MMB2:  ABSD MBF 7 :TEST INSTRUCTION. 


STFPS R5 sGET FPS. 
MOV #MMBBFO,R1 ; CHECK RESULT. 
MOV #4 ,R2 
1$ TST (R1)+ 
BNE MMB 15 ;BRANCH IF INCORRECT. 
SOB R2,1 
CMP #204,R5 IS THE FPS CORRECT? 
BNE MMB25 sBRANCH IF INCORRECT. 
BR MMBDONE 
; THESE ARE TEST DATA TABLES AND DATA BUFFER, 
MMBTP1: 137 
045607 
101230 
45607,MMBBFO,-1,-1,-1 
MMBTP2: 0 
0 
0 
0 
MMBBF 0 -1 
-1 
-1 
MMBBF1: -1 
a4 
-1 
-1 
:1F A TRAP TO & OCCURS COME HERE. 
MMB10: MOV (SP) ,Re_ sSEE IF THE TRAP OCCURRED ON THE TEST INSTRUCTION, 
CMP R2, 4MMB2 +2 
BEQ 1$ BRANCH IF YES. 


83 


CKFPCCO FRIIF FLTG PNT 


TEST # 31 = NEGF, 


3748 017356 
3749 917362 
tes 017364 


3752 017370 
3753 017372 
3754 017376 
3755 017400 
3756 


3757 

3758 017402 
3759 017410 
3760 017416 
3761 017424 
3762 017426 
3763 


376 

3764 017430 

3765 017434 

3766 017442 

2767 

3768 017444 
017444 


ABSF 


020227 
pons 


022626 


PRT C 
AND TSTF 


017246 
047302 


001236 


G 7 
MACRO M1113 O9=APR=-81 13:53 PAGE 34-1 
SRC MODE 7, GR7 


001240 
001242 
001244 


001244 


sREPORT 
1$: 

23: 
sREPORT 
MMB1S: 
1$: 
sREPORT 
MMB25: 


13: 


MMBD ONE : 


SEQUENCE 


CMP rt AMMB2 +4 

BEQ 1$ ;BRANCH IF YES. 

JMP CPSPUR ;OTHERWISE GO REPORT a TRAP TO 4, 
AN FDST FLOW FAILURE RESULTED IN A TRAP TO 4 

CMP (SP)+,(SP)+ 


MOV R2 $TMP2 
ERROR +132 ZODD ADRES 
BR MMBD ONE ‘BUT FDSTX IN ST 771 
+ See INCORRECT: 
MOV AMMBTP2, $TMP3 
MOV 4MMBTP1,STMPS 


#MMBBF 0, $TMPS 


MOV 
Spe +133 sBAD DATA x11*0 ST 3127 


MMBDONE 
FPS INCORRECT: 
MOV R5,$TMP3 
MOV #204, $TMPS 
ERROR +134 iF PSX 
RSE TUP 3GO INITIALIZE THE FPS AND STACK; AND 


sSEE IF THE USER HAS EXPRESSED 

3 THE DESIRE TO CHANGE THE SOF TWARE 
sVIRTUAL CONSOLE SWITCH REGISTER (HAS 
3 THE USER TYPED CONTROL G?). 


CKFPCCO FRIIF FLTG PNT PRT C 


TEST @ 32 = SPECIAL DEST, MODE 0, TES 


3775 


917446 
3777 017450 


3787 017500 


Ww 
N 
& 
oO 
—_ 
N 
al 
R 


3799 017544 


3802 017546 


000004 


012737 
170700 


170205 
012700 


000200 
017546 


017474 001236 


000200 
017566 
017566 


017556 
000004 


000210 


017566 00124.) 
017556 00124¢ 
017546 017566 


»SATTL 


T*TEST 


H 7 
eee ee O9-APR=-81 13:53 PAGE 35 


TEST # 32 = SPECIAL DEST, MODE 0, TEST 


TAPPER SSEESEERESSSE REE EERE RRR RRR RRR RRR RRR R RRR RRR RRR RRR RRR RRR O DDD! 


32 SPECIAL DEST, 


MODE 0, TEST 


y*THIS IS A TEST OF THE NEGF ABSF AND TSTF DESTINATION FLOWS 
:*MODE QO USING THF NEGD INSTR. 


SRE RRR ERA EAR ERE EERE EEE REE EA AEA EAARERARARARAAHREKREKER EE 


TST32: SCOPE 
NNB1: 
LPERR 
V #200,R0 
LDFPS RO 
MOV #NNBTP1,RO 
LDD (RO) ,ACO 
MOV #NNB2 , $TMP2 
NNB2: NEGD ACO 
STFPS RS 
V #200,R0 
LDFPS RO 
Vv A#NNBBF 0, RO 
STD ACO, (RO) 
MOV #NNBBF O, RO 
MOV #NNBTP2_R1 
MOV #4 R2 
1$: CMP (RO) +, (R1)+ 
BNE NNB10 
SOB R2,1$ 
CMP #210,R5 
BNE NNB 15 
BR NNBDONE 
: THESE ARE DATA TABLES AND A 
NNBIP1: 013572 
46013 
57246 
013570 
NNBTP2: 113572 
46013 
57246 
013570 
NNBRFO: 0 
0 
¢) 
0 
;REPORT RESULT INCORRECT: 
NNB10: MOV ANNBBF 0, $TMP3 
MOV #NNBTP2. $TMP4 
CMP NNBTP1, NNBBF 0 
BNE NNB11 
1$: ERROR +135 
BR NNBDONE 


el 
oe 


THE LOOP ON ERROR ADDRESS. 


:SET UP ACO. 


3 TEST INSTRUCTION. 


sGET FPS. 
sSET FD. 


:GET THE RESULT. 
31S THE RESULT CORRECT? 


BRANCH iF INCORRECT. 
31S THE FPS CCRRECT? 
;BRANCH IF INCORRECT. 


DATA BUFFER. 


7E10*#200K ST 336 


SEQUENCE 


85 


7 
CKFPCCO FRIIF FLTG PNT PRT C MACRO M1113 O9=APR=81 13:53 PAGE 5-4 SEQUENCE 
TEST # 32 = SPECIAL DEST, MODE 9, TEST 


3823 ;REPORT RESULT INCORRECT: 
3824 017626 NNB11: 
3825 017626 104136 1$: ERROR +136 ;BAD DATA NEGF 
sa59 017650 000406 BR NNBD ONE 
3828 ;REPORT FPS INCORRECT: 
3829 017632 010537 001242 NNB15: MOV RS,$TMP4 
3830 017636 012737 000210 001240 MOV #210, $TMP3 
Se 017644 104137 1$: ERROR +137 zFPSX 
3833 017646 NNADONE : 
017646 104412 RSE TUP 3GO INITIALIZE THE FPS AND STACK; AND 


ZSEE If THE USER HAS EXPRESSED 

THE DESIRE TO CHANGE THE SOF TWARE 
;VIRTUAL CONSOLE SWITCH REGISTER (HAS 
7 THE USER TYPED CONTROL G?). 





i Ff 
CKFPCCO FRITIF FLTG PNT PRT C MACRO M1113 O9-APR-81 13:53 PAGE 36 
TEST # 33 = SPECIAL DEST, MODE 1, TEST 


3834 -SBTTL TEST # 33 = SPECIAL DEST, MODE 1, TEST 


SS RARAAAAAAAAAAAAKEHAARAARAERAAERAARARARIRARAARARRARARRARARARAREEHED 


TeTEST 33 SPECIAL DEST, MODE 1, TEST 


*THIS IS A TEST OF THE NEGF ABSF AND TSTF DESTINATION FLOWS 
:*MODE 1 USING THE NEGD INSTR, 
RTTITT TITTLE ELLE LLL LEE 


3835 017650 000004 1ST33: SCOPE 
3836 017652 0081 : 
017652 104413 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
3837 017654 012701 017764 MOV #OOBTP1,R1 SET UP THE DATA BUFFER. 
3838 017660 012700 017774 MOV #OOBTP2 ,RO 
3839 017664 012702 000004 MOV #4 ,R2 
3840 017670 012021 1$: MOV (RO) +,(R1)+ 
3841 017672 077202 _ SOB R2,1$ 
3842 017674 012700 017764 MOV #OOBTP1 ,RO 
3843 017700 042710 100000 BIC #100000, (RO) ;MAKE OPERAND POSITIVE. 
3844 017704 012737 017720 001236 MOV #00B2 ,$TMP2 
3845 017712 012701 000200 MOV #200,R1 SET FD. 
soe 017716 170101 LDFPS R11 
3848 017720 170710 OOB2: NEGD (RO) TEST INSTRUCTION. 
3849 017722 170205 STFPS = R5 GET FPS. 
3850 017724 012701 017764 MOV #O0BTP1,R1 31S THE RESULT CORRECT. 
3851 017730 012702 017774 MOV #OOBTP2 ,R2 
3852 017734 012703 000004 MOV #4 ,R3 
3853 017740 022122 1$: CMP (R1)+,(R2)+ 
3854 017742 001020 BNE 00810 BRANCH IF INCORRECT. 
3855 017744 077303 SOB R3,1$ 
3856 017746 022700 017764 CMP #OOBTP1,RO 31S RO CORRECT. 
3857 017752 001024 BNE 00615 ;BRANCH IF INCORRECT. 
3858 017754 022705 000210 CMP A? R5 31S THE FPS CORRECT? 
3859 017760 001030 BNE 0820 ;BRANCH IF INCORRECT. 
oe 017762 000435 BR OOBDONE 
3862 THESE ARE DATA TABLES AND A DATA BUFFER, 
3863 017764 023245 OOBTP1: 023245 
3864 017766 026720 26720 
3865 017770 122324 122324 
3866 017772 052672 52672 
3867 017774 1235245 OOBTP2: 123245 
3868 017776 026720 267 
3869 020000 122324 122324 
Ha 020002 052672 52672 
3872 REPORT RESULT INCORRECT: 
3873 020004 012737 017764 001240 00B10: MOV #OOBTP1 ,STMPS 
3874 020012 012737 017774 001242 MOV MOOBTP2 ,STMPé 
3875 020020 104140 1$: ERROR +140 BAD DATA 
te 020022 000415 BR OOBDONE 
3878 REPORT RO INCORRECT: 
3879 020024 9012737 017764 001240 00815: MOV #OOBTP1 ,$TMP3 
3880 020032 010037 001242 MOV RO,$TMP4 
3881 020036 104141 1$: ERROR +141 SPEC DESTX 


SEQUENCE 


87 


cm) 


—-------- 


| 
| 
| 
| 
| 


CKFPCCO FPIIF FLTG PNT PRT C 
TEST # 33 = SPECIAL DEST, MODE 1 


3882 020040 

3883 

3884 

3885 020042 

3886 020050 

3887 020054 

3888 

3889 020056 
020056 


000406 


012737 000210 001240 
tae tas 001242 


104412 


BR 


OOBDONE 


REPORT FPS INCORRECT: 
MOV 


00B20: 
1$: 


OOBDONE : 





MOV 
ERROR 


RSETUP 


ae! 0,$TMP3 
R5 /$TMP4 
+142 


7 
Ate ST M1113 Q9=APR=81 13:53 PAGE S61 


7ROK 


3GO INITIALIZE THE FPS AND STACK; AND 
;SEE IF THE USER HAS EXPRESSED 

;THE DESIRE TO CHANGE THE SOFTWARE 
;VIRTUAL CONSOLE SWITCH REGISTER (HAS 
; THE USER TYPED CONTROL G?). 


SEQUENCE 


88 


ye) 


7 
CKFPCCO FRIIF FLTG PNT PRT MACRO M1113 09=APR=81 13:53 PAGE 47 SEQUENCE 89 
TEST # 34 = SPECIAL DEST, MODE 2, TEST 


3890 -SBTTL TEST # 34 = SPECIAL DEST, MODE 2, TEST 
MPSS SeSERERRSSSSALSSSE RES ARR SESSA SARS ESR SA RRR RRS RRR ARRAS RRS R ESSE SD OS 


SeTEST 34 SPECIAL DEST, MODE 2, TEST 


*% 
s*THIS IS A TEST OF THE NEGF ABSF AND TSTF DESTINATION FLOWS 
s *MODE 2 USING THE NEGD INSTR. 


; EE a Ee eT Ta RO Sey Te 


020060 000004 1S134: SCOPE 
3891 020062 PPB1: 
3892 020062 104413 “LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
| 3893 020064 012701 020174 MOV #PPBTP1,R1 ;SET UP THE DATA BUFFER. 
3894 020070 012700 020204 MOV #PPBTP2,RO 
3895 020074 012702 000004 MOV #4 ,R2 
3896 020100 012021 1$: MOV (RO) +, (R1)+ 
3897 020102 077202 SOB ans 1$ 
3898 020104 012700 020174 MOV PBTP1,RO 
3899 020110 042710 100000 BIC 7100000, (RO) s;MAKE OPERAND POSITIVE. 
3900 020114 012737 020130 001236 MOV #PPB2,$TMP2 
3901 020122 012701 000200 MOV #200,R1 3SET FD. 
sont 020126 170101 LDFPS RI 
one 020130 170720 PPB2:  NEGD (RO) + TEST INSTRUCTION. 
3906 020132 170205 STFPS RS sGET FPS. 
3907 020134 012701 020174 MOV #PPBTP1,R1 31S THE RESULT CORRECT. 
3908 020140 012702 020204 MOV #PPBTP2,R2 
3909 020144 012703 000004 MOV #4 ,R3 
3910 020150 022122 1$: CMP (R1)+,(R2)+ 
3911 020152 001020 BNE PPB10 ;BRANCH IF INCORRECT. 
3912 020154 077303 SOB R3,1$ 
3913 020156 022700 020204 CMP #PPBTP1+10,RO ;IS RO CORRECT. 
3914 020162 001024 BNE PPB15 BRANCH IF INCORRECT. 
3915 020164 022705 000210 CMP #210,R5 31S THE FPS CORRECT? 
3916 020170 001030 BNE PPB20 ;BRANCH IF INCORRECT. 
ate 020172 000435 BR PPBDONE 
3919 ; THESE ARE DATA TABLES AND A DATA BUFFER. 
3920 020174 023245 PPBTP1: 023245 
3921 020176 026720 26720 
3922 020200 122324 122324 
3923 020202 052672 52672 
3924 020204 123245 PPBTP2: 123245 
3925 020206 026720 26720 
3926 020210 122324 122324 
add 020212 052672 
3929 REPORT RESULT INCORRECT: 
3930 020214 012737 020174 001240 PPB10: MOV #PPBTP1 ,$TMP3 
3931 020222 012737 020204 001242 MOV #PPBTP2,$TMP4 
3932 020230 104143 1$: ERROR +143 BAD DATA 
siz 020232 000415 BR PPBDONE 
3935 ;REPORT ~ INCORRECT: 
3936 020234 012737 020204 001240 PPBIS: ip hi $TMP3 


3937 020242 010037 001242 MOV RO,$TMP 





TEST # 34 = SPECIAL DEST, MODE 2, 


3938 020246 
3540 020250 


se 
bs 
| CKFPCCO_FPTIF FLTG PNT PRT ( 
! 


394 

3902 020252 
3943 020260 
3944 020264 
3945 


| 
3946 020266 
020266 


000210 001240 
001242 


7 
est M1113 O9-APR=81 13:53 PAGE B7=1 


1$: ERROR +144 

BR PPBDONE 
REPORT FPS INCORRECT: 
PPB20: MOV #210, $1MP3 

MOV RS, $TMP4 
1$: ERROR +145 
PBDONE : 

RSE TUP 


3SPEC DESTX ROX 


3GO INITIALIZE THE FPS AND STACK; AND 
;SEE IF THE USER HAS EXPRESSED 

3 THE DESIRE TO CHANGE THE SOF TWARE 
SVIRTUAL CONSOLE SWITCH REGISTER (HAS 


:THE USER TYPED CONTROL G?). 


SEQUENCE 


90 


3947 


020270 
3948 asus s 
3949 020274 


020406 
3977 020410 
3978 020412 
3979 020414 
3980 020416 


sony 020454 
3992 

3993 020456 
3994 020464 


000004 


104413 
012701 
012 


170101 
170740 


170205 


052672 


012737 
012737 
104146 
000415 


012737 
010037 


CKFPCCO_FPI1F FLTG PNT PRT C 
TEST # 35 = SPECIAL DEST, MODE 4, 


020406 
020426 
000004 


020416 

100000 
020342 
000200 


020406 


020406 
000210 


177777 


020406 
020426 


020406 
001242 


177770 
001236 


177777 


001240 
001242 


001240 





N 7 
meat Maga O9=APR=81 13:53 PAGE 38 


SEQUENCE 91 


. SBTTL TEST # 35 = SPECIAL DEST, MODE 4, TEST 


—MmASSAALARAALASAAASALASLASARASALALSAASASSRARARARRSRRRRR SR SSSA SASS SD S| 


: TEST 35 SPECIAL DEST, MODE 4, TEST 


tS THIS i* A TEST OF THE NEGF ABSF AND TSTF DESTINATION FLOWS 
;*MODE 4 USING THE NEGD INSTR. 
T 


° 
5 LAA ARARRAERERKERERERERE EERE ERE 


1ST35: SCOPE 


QQB1: 
LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
MOV #QQBTP1,R1 3SET UP THE DATA BUFFER. 
MOV #QQBTP2,RO 
MOV #4 ,R2 
1$ MOV (RO) +, (R1)+ 
SOB R2,1$ 
MOV #QQBTP1+ 10,RO 
BIC #100000, -10(RO) ;MAKE OPERAND POSITIVE. 
MOV #QQB2, STMP 2 
MOV #200,R sSET FD. 
LDFFS = R1 
QQB2: NE GD -(RO) ; TEST INSTRUCTION. 
STFPS R5 :GET FPS. 
MOV #QQBTP1,R1 31S THE RESULT CORRECT. 
MOV #QQBTP2,R2 
MOV #4 ,R3 
1$ CMP (R1)+,(R2)+ 
BNE QQB10 ;BRANCH IF INCORRECT. 
SOB R3,1$ 
CMP #QQBTP1,RO 71S RO CORRECT. 
BNE QQB15 ;BRANCH IF INCORRECT. 
CMP #210,R5 :IS THE FPS CORRECT? 
BNE QQB20 ;BRANCH IF INCORRECT. 
BR QQBDONE 
; THESE ARE DATA TABLES AND A DATA BUFFER. 
QQBTP1: 023245 
26720 
122324 
52672 
-WORD <-1,-1,-1,-1 
QQBTP2: 123245 
26720 
122324 
672 
;REPORT RESULT INCORRECT: 
QQB10: MOV #QQBTP1,$TMP3 
MOV #QQBTP2, $TMPS 
1$: ERROR +146 ;BAD DATA 
BR QQBDONE 


REPORT ~# INCORRECT: 
Q0B15: #QQBTP1, rs 
MOV RO,$TMP4 


B 8 
—CKFPCCO_FP1IF FLTG PNT PRT C MACRO M1113 O9=APR=81 13:53 PAGE 38-1 SEQUENCE 92 
TEST # 35 ~ SPECIAL DEST, MODE 4, TEST 


| 3995 020470 104147 1$: ERROR +147 ySPEC DESTX ROX 
3996 020472 000406 BR QQBDONE 
| 99 


3999 ;REPORT FPS INCORRECT: 
4000 020474 012737 000210 001240 00820: MOV #210, $TMP3 
4001 020502 010537 001242 MOV R5,$TMP4 
4002 020506 104150 1$: ERROR +150 
4004 020510 QOBDONE : 
020510 104412 RSETUP :GO INITIALIZE THE FPS AND STACK; AND 


;SEE IF THE USER HAS EXPRESSED 

;THE DESIRE TO CHANGE THE SOF TWARE 
7VIRTUAL CONSOLE SWITCH REGISTER (HAS 
;THE USER TYPED CONTROL G?). 





| REMC CO FP1IF FLTG PNT PRT C 


TEST # 36 = SPECIAL DEST, MODE 3, 


4006 


? 020512 
4008 020514 
020514 

4009 020516 


4021 020570 
4023 020572 


4048 020656 
4049 020664 
4050 020672 
4051 020674 
4052 
4053 


012701 
170101 


170730 
170205 


012737 
0 


020634 
020644 
000004 


020654 


4 
100090 0204634 
sede 001236 


000004 


020656 
000210 


020634 001240 
020644 001242 





8 
er M1113 O9-APR-81 13:53 PAGE 9 


SEQUENCE 93 


. SBTTL TEST # 36 = SPECIAL DEST, MODE 3, TEST 


MAA AAAARARRAAASASARRRAAARARAR AAAS SRSARSESER RRR RR RR SRR RSS RR SSE SS 


:*TEST 36 SPECIAL DEST, MODE 3, TEST 


< STHIS IS A TEST OF THE NEGF ABSF AND TSTF DESTINATION FLOWS 
; *MODE 3 USING THE NEGD INSTR. 


Py 
Weta eee eee PPP RRRRRRRRRRRRRARARRSRRRR SERS ERAS SSS DS 


1$136: SCOPE 


RRB1: 
LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
MOV #RRBTP1,R1 7SET UP THE DATA BUFFER. 
MOV #RRBTP2,RO 
MOV #4 ,R2 
1$ MOV (RO) +,(R1)+ 
SOB R2,1$ 
MOV #RRBTP3,RO 
MOV #RRBTP1, (RO) 
BIC #100000,RRBTP1 ;MAKE THE OPERAND POSITIVE. 
MOV #RRB2 , STMP2 
MOV #200,R1 ;SET FD. 
LDFPS R1 
RRBe: NE GD a(RO)+ : TEST INSTRUCTION, 
STFPS RS ;GET FPS. 
MOV ARRBTP1,R1 71S THE RESULT CORRECT. 
MOV #RRATP2,R2 
MOV #4 ,R3 
1$: CMP (R1)+,(R2)+ 
BNE RRB10 ;BRANCH IF INCORRECT. 
SOB R3,1$ 
CMP #hRBTP3+2 .RO 71S RO CORRECT. 
BNE ;BRANCH IF INCORRECT. 
CMP A210, ~ 71S THE FPS CORRECT? 
BNE RB20 ;BRANCH IF INCORRECT. 


BR RRBDONE 


; THESE ARE DATA TABLES AND A DATA BUFFER. 
RRBTP1: 023245 


52 
RRBTP2: 123245 


526 

RRBTP3: RRBIP1 

REPORT RESULT INCORRECT: 
MOV 


RRB10: #RRBTP1,STMP3 
MOV A#RRBTP2, STMP4 , 
1$: ERROR +150 BAD DATA 
BR RRBDONE 


REPORT RO INCORRECT: 


4-7 


D 8 
MACRO M1113 O9-APR=81 13:53 PAGE 39-1 


——— EEE EEE 


4065 


i INITIALIZE THE FPS AND STACK; AND 


E IF THE USER HAS EXPRESSED 


‘THE DESIRE TO CHANGE THE SOFTWARE 
“VIRTUAL CONSOLE SWITCH REGISTER (HAS 
‘THE USER TYPED CONTROL G?). 


“cKFPCCO FPITIF FLTG PNT PRT C SEQUENCE 94 
TEST # 36 = SPECIAL DEST, MODE 3, TEST 

4054 020676 012737 020656 001240 RRBI5: MOV #RRBTP3+2,$1MP3 

4055 020704 010037 001242 MOV RO, $TMP4 

4056 020710 104152 1$: ERROR +152 :SPEC DESTX ROM 

pris 4 020712 000406 BR RRBDONE 

4059 REPORT FPS INCORRECT: 

4060 020714 012737 000210 001240 RRB20: MOV #210, $1MP3 

4061 020722 010537 001242 MOV R5,$TMP4 

Prey 020726 104153 1$: ERROR +153 

4064 020730 RRBDONE : 

020730 104412 RSETUP 


E 8 
CKFPCCQ FPIIF FLTG PNT PRT tas * M1113 O9-APR=-81 13:53 PAGE 40 
TEST # 37 = SPECIAL DEST, MODE 5. TES 


4066 .SBTTL TEST # 37 = SPECIAL DEST, MODE 5, TEST 


TRAPPER PSSESESESSE SERRE ERE RRR RRR RRR RRR SERRE ERR R RR RRR RRR RRR RRA R ERED 


TeTEST 37 SPECIAL DEST, MODE 5, TEST 


:*THIS IS A TEST OF THE NEGF ABSF AND TSTF DESTINATION FLOWS 
7*MODE 5 USING THE NEGD INSTR. 


Tee e eee ERED TAP RRRRRRRRERSSERE RRS E RRR RRR RRR RRR RRR RRR RASS SS 
020732 000004 1ST37: SCOPE 
4067 020734 SSB1: 
020734 104413 | LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
4068 020736 012701 021056 MOV A#SSBTP1,R1 7SET UP THE DATA BUFFER. 
4069 020742 012700 021066 MOV A#SSBTP2,RO 
4070 020746 012702 000004 MOV #4 ,R2 
4071 020752 012021 1$: MOV (RO)+,(R1)+ 
4672 020754 077202 SOB R2,1$ 
4073 020756 012700 021100 MOV ASSBTP3+2,RO 
4074 020762 012760 021056 177776 MOV ASSBTP1,=2 (RO) 
4075 020770 042737 100000 021056 BIC #100000,SSBTP1 ;MAKE THE OPERAND POSITIVE. 
4076 020776 012737 021012 001236 MOV A#SSB2 ,STMP2 
4077 021004 012701 000200 MOV #200,R1 SET FD. 
prs 021010 170101 LDFPS RI 
ras 021012 170750 SSB2: NEGD a- (RO) TEST INSTRUCTION. 
4082 021014 170205 STFPS = R5 GET FPS. 
4083 021016 012701 021056 MOV ASSBTP1,R1 31S THE RESULT CORRECT. 
4084 021922 012702 021066 MOV ASSBTP2,R2 
4085 021026 012703 000004 MOV #4 ,R3 
4086 021032 022122 1$: CMP (R1)+,(R2)+ 
4087 021034 001021 BNE SSB10 ;BRANCH IF INCORRECT. 
4088 021036 077303 SOB R3,1$ 
4089 021040 022700 021076 CMP ASSBTP3,RO 31S RO CORRECT. 
4090 021044 001025 BNE SSB15 BRANCH IF INCORRECT. 
4091 021046 022705 000210 CMP #210,R5 31S THE FPS CORRECT? 
4092 021052 001031 BNE SSB20 ;BRANCH IF INCORRECT. 
pres 021054 600436 BR SSBDONE 
4095 ; THESE ARE_DATA TABLES AND A DATA BUFFER, 
4096 021056 023245 SSBTP1: 023245 
4097 021060 026720 6720 
4098 021062 122324 122324 
4099 021064 052672 52672 
4100 021066 123245 SSBTP2: 123245 
4101 021070 026270 26270 
4102 021072 122324 122324 
4103 021074 052672 6 
rs = 021076 021056 SSBTP3: SSBTP1 
4106 _ sg REPORT ~ el INCORRECT: 
4107 021100 012737 021056 001240 SSB10: #SSBIP1,$STMP3 
4108 021106 012737 021066 001242 MOV A#SSBIP2,$TMP4 
4109 021114 104154 1$: ERROR +154 ;BAD DATA 
re 021116 000415 BR SSBDONE 
4112 ;REPORT RO INCORRECT: 


4113 021120 012737 021076 001260 §SB15: MOV #SSBIP3,$TMP3 


SEQUENCE 


9 


F 8 
CKFPCCO FPI1F FLTG PNT PRT C MATRO M1113. 09-APR=81 13:53 PAGE 40-1 SEQUENCE 96 
TEST # 37 = SPECIAL DEST, MODE 5, [EST 
4114 021126 010037 007242 MOV RO, $TMP4 
4115 021182 106155 1$: ERROR +155 :SPEC CESTX ROX 
4:18 021134 000406 BR SSBDONE 
6118 sREPORT FPS INCORRECT: 
4119 021136 012737 000.10 001240 §s5820: MOV #210, $TMP3 
4120 021144 010537 001242 MOV RS, $TMP4 
sigh 021150 104156 1$: ERROR +156 
4123 021152 SSBDONE : 
021152 106412 RSE TUP :GO INITIALIZE THE FPS AND STACK; AND 


3SEE IF THE USER HAS EXPRESSED 

3 THE DESIRE TO CHANGE THE SOF TWARE 
;VIRTUAL CONSOLE SWITCH REGISTER (HAS 
;THE USER TYPED CONTROL G?). 


SOLU gains Seer 


— 





CKFPCCO FRPITIF FLTG PNT PRT C 
TEST # 40 = SPECIAL DEST, 


41246 


021222 
021224 
021226 


021326 


021330 


170101 
170720 
170205 


021270 
0 
AS 4 001236 


021270 
021300 
000004 


021274 
000010 


021270 001240 
021300 001242 


021274 001240 
001242 


G 8 
MACRO M1113 ee 13:53 PAGE 41 
FLOATING MODE 2, TES 


-SBTTL TEST # 40 = SPECIAL DEST, FLOATING MODE 2, TEST 


MEAP RR RR RRR RRR RARRSRARRARRRRRRRRRRRR RRA RSRRARRR RRR RRR RRA RRR SAE RSE SDS 


S*TEST 40 SPECIAL DEST, FLOATING MODE 2, TEST 


:*THIS IS A TEST OF THE NEGF ABSF AND TSTF DESTINATION FLOWS 
*MODE 2 USING THE NEGF INSTR. 
® 


CORBA RASARS AR RRR RSE RR RRRR RRR RRR RRA RR RAR ARERR RRR RRR ARR RRR RASS EE SD 


TST40: SCOPE 


TTBI: 
LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
MOV #TTBRTP1,R1 ZSET UP THE DATA BUFFER. 
MOV #TTBTIP2,RO 
MOV #4,R2 
1$: MOV (RO) +, (R1)+ 
SOB R2,1 
MOV #TTBTP1,RO 
BIC #100000, (RO) MAKE OPERAND POSITIVE. 
MOV #7TB2,$TMP2 
MOV #000,R1 sSET FD. 
LDFPS R1 
TTBe: NE GF (RO) + ZTEST INSTRUCTION. 
STFPS R5 soET FPS. 
MOV #TTBIPI,R1 71S THE RESULT CORRECT. 
MOV #TTBIP2,R2 
MOV #4,R 
1$: CMP (R1)+,(R2)+ 
BNE TTB10 ;BRANCH IF INCORRECT. 
SOB R3,1$ 
CMP ATTBTP1+4,R0 71S RO CORRECT. 
BNE TTB15 BRANCH IF INCORRECT. 
CMP #010,R5 :1S THE FPS CORRECT? 
BNE TTB20 ;BRANCH IF INCORRECT. 


T TBDONE 


THESE ARE DATA TABLES AND A DATA BUFFER, 
TIBIP1: toe 45 


720 
122324 
52672 
TIBTP2: 123245 
26720 
122324 
52672 
SREPORT RESULT INCORRECT: 
TTB10: MOV #TTBIP1,$TMP3 
MOV #TTBTP2,STMPS 
1$: ERROR +150 ;BAD DATA 
BR TTBDONE 
REPORT RO INCORRECT: 
TIRIS: MOV #TTBIP1+4,$TMP3 
MOV RO, STMP4 
1$: ERROR +160 sSPEC DESTX ROx 


SEQUENCE 


97 


———————————— 


CKFPCCO FRITIF FLTG PNT PRT C 
TEST # 40 = SPECIAL DEST, 


4172 021344 
4173 
4°74 
4175 021346 


4176 021354 
4177 021360 
417. 


8 
4179 021362 
021362 


00040€ 

012737 000010 001240 
bated 001242 

104161 1$: 
106412 


REPORT 
11820: 


TTBDONE : 


H 8 
MACRO M1113 * Sina 13:53 PAGE 41-1 SEQUENCE 98 
FLOATING MODE 2, TES 


BR TTBDONE 

FPS INCORRECT: 

MOV #010, $TMP3 

MOV RS, $TMP4 

ERROR +161 

RSE TUP 3GO INITIALIZE THE FPS AND STACK; AND 


;SEE If THE USER HAS EXPRESSED 
THE DESIRE TO CHANGE THE SOF TWARE 
A ee CONSOLE SWITCH REGISTER (HAS 
THE USER TYPED CONTROL G?). 
TEST TITLE: SPECIAL DEST. MODE2, GR7 (IMMEDIATE) 


1 8 
CKFPCCO FPTIF FLTG PNT PRT C MACRO M1113 O9=APR=-87 13:53 PAGE 42 SEQUENCE 
TEST # 41 = SEE ABOVE COMMENT FOR TEST TITLE 


4181 ~-SBTTL TEST # 41 = SEE ABOVE COMMENT FOR TEST TITLE 


SL AAAAAAAAAAAAAERARAAARAAAARAHARARARARIRARARAARARARRARAAERAA HARES 


TEST 41 SEE ABOVE COMMENT FOR TEST TITLE 


-@ 
° 


y*THIS IS A TEST OF THE NEGF ABSF AND TSTF DESTINATION FLOWS 
:*MODE 2( IMMEDIATE) USING THE NEGD INSTR. 

-* 

ETT TTT TTT TTT TTTTT TTT TITEL LTT 


021364 000004 TST41: SCOPE 
4182 021366 UUBT: 
021366 104413 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
4183 021370 012700 021514 MOV MUUBTP2 ,RO 
4184 021374 012701 021442 MOV MUUBTP1 ,R1 SET UP THE DATA BUFFER. 
4185 021400 012702 000004 MOV #4 ,R2 
4186 021404 012021 1$: MOV (RO)+,(R1)+ 
4187 021406 077202 SOB R2,1$ 
4188 021410 012700 021442 MOV AMUUBTP1 ,RO 
4189 021414 042737 100000 021442 BIC #100000,UUBTP1 ;MAKE THE OPERAND POSITIVE. 
4190 021422 012737 021440 001236 MOV MUUB2 , STMP2 
4191 021430 012701 000200 MOV #200,R1 SET FD. 
4192 021434 170101 LDFPS RI 
star 021436 005901 CLR R1 
4195 021440 170727 UUB2:  NEGD (R7)+ TEST INSTRUCTION. 
4196 021442 005201 005201 005201 \WUBTP1: 5201,5201,5201,5201 
4197 sNOTE THAT AFTER EXECUTING THIS ae ig R1 SHOULD CONTAIN 3. 
4198 021452 170205 STFPS = R5 GET FPS. 
4199 021454 012703 021442 MOV MUUBTP1 ,R3 31S THE RESULT CORRECT. 
4200 021460 012702 021514 MOV MUUBTP2 ,R2 
4201 021464 012704 000004 MOV 
4202 021470 022322 1$: CMP (R3)+,(R2)+ 
4203 021472 001014 BNE \JUB 10 BRANCH IF INCORRECT. 
4204 021474 077403 SOB R4,1$ 
4205 021476 022701 000003 CMP #5,R1 WAS R1 ge yt # CORRECTLY. 
4206 021502 001027 BNE UUB15 [BRANCH IF INCORREC 
4207 021504 022705 000210 CMP #250,R5 31S THE FPS CORRECT?" 
4208 021510 001015 BNE UUB20 BRANCH IF INCORRECT. 
esa 021512 000436 pe eae BR UUBDONE 
4211 ; THESE ARE DATA TABLE, 
4212 021514 105201 UUBTP2: 105201 
4213 021516 005201 5201 
4214 021520 005201 5201 
Sur 021522 005201 5201 
4217 REPORT ~ + mae etree 
4218 021524 012737 021442 001240 UuB10: MUUBTP1 ,$TMP3 
4219 021532 012737 021514 001242 MOV MUUBTP2 , $TMP4 
4220 021540 104162 1$: ERROR +162 BAD DATA 
e553 021542 000422 BR UUBDONE 
4223 ;REPORT FPS INCORRECT: 
4224 021544 012737 000210 001240 UUB20: MoV #210, $1MP3 
4225 021552 010537 001242 MOV R5,$TMP4 
4226 021556 104163 1$: ERROR +163 sFPS 
BR UUBDONE 


54 021560 000413 





—————— CC CC CC LL LL LL 


CKFPCCO FRPTIF FLTG PNT PRT C 
TEST # 41 = SEE ABOVE COMMENT FOR TEST TITLE 


REPORT PC INCORRECTLY INCREMENTED DURING EXECUTION. 
UUB15: SUB #3,R1 


4229 
4230 021562 
42335 021574 
4234 021600 
4235 021602 
rt; ] 021606 
4238 pereis 

021610 


104164 


104412 


000003 


021444 
001240 


001242 


1$: 


UUBDONE : 


J. 8 
MACRO M1113 O9=APR=81 13:53 PAGE 421 SE GUENCE 


R1 
M#UUBTP1+2,R2 

R2,$TMP3 

R1,R2 

R2,$TMP4 

+164 PC BAD CONSTAND B GR7X 


3GO INITIALIZE THE FPS AND STALK; AND 
[SEE IF THE USER HAS EXPRESSED 

7 THE DESIRE TO CHANGE THE SOF TWARE 
sVIRTUAL CONSOLE SWITCH REGISTER (HAS 
3 THE USER TYPED CONTROL G?). 


8 
/CKFPCCO FRIIF FLTG PNT PRT C MACRO M1113 O9=APR-81 13:53 PAGE 43 SEQUENCE 101 
TEST # 42 = SPECIAL DEST, MODE 6, TEST 


4239 .SBTTL TEST # 42 = SPECIAL DEST, MODE 6, TEST 
POI III ISOIUIISISISISIDIOIIIOI IIIS IOIIUIISIIIOIUIIIOIUIUIDIDIOIOIUIDIDIDISIOIOI 


;*TEST 42 SPECIAL DEST, MODE 4, TEST 


THIS IS A TEST OF THE NEGF ABSF AND TSTF DESTINATION FLOWS 
;*MODE 6 USING THE NEGD INSTR. 


TARR RRRRERSAASAASLALASSASARARARARR RARE RRR ARS R ARRAS RRR RA REARS ESSE SSS | 


| 
021612 000004 $142: SCOPE 
| 40 eDSABL AMA DISABLE MODE 6 TO MODE 3 CONVERSIONS 
£541 021614 KXB1: 
| 021614 104413 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
021616 012701 021740 MOV #XXBIP1,R1 ;SET UP THE DATA BUFFER. 
| 021622 012700 021750 MOV —soXXBTP2.RO 
021626 012702 000004 MOV #42 
021632 012021 1$: MoV (RO) +, (R1)4 
051634 077202 S0B. sé} 
031636 012700 014537 MOVs AXXBTP1-5201,RO 
021642 045767 100000 000070 BIC #100000. xxBTPT; “MAKE OPERAND POSITIVE. 
021650 012767 021666 157360 MOV —«AXXB2.$TMP2 
021656 012701 000200 MOV «#2001 :SET FD. 
021662 170301 LDFPS RI 
021664 005001 CLR RT 
021666 170760 005201 XXB2: NEGD 5201(RO) TEST INSTRUCTION. 
021672 170205 STFPS RS <GET FPS” 
051674 005701 TST — RI 
021676 001030 BNE XXB25 sWAS THE PC CORRECT AFTER EXECUTION? 
021700 012701 021740 MOV —sAXXBTP1.R1 1S THE RESULT CORRECT. 
4559 021704 012702 021750 MOV —-AXXBTP2°R2 
021710 0127038 000004 MOV #43 
051714 022122 18: (MP —s (R14) #, (R2)+ 
021716 001030 BNE XXB10 “BRANCH IF INCORRECT. 
021720 077303 SOB ~—Ss«éRS3 1 
051722 022700 014537 (MP ss #XXBTP1-5201.RO :1S RO CORRECT. 
021726 001034 BNE —-KXB15 “BRANCH IF INCORRECT. 
021730 022705 000210 (MPs #210. “TS THE FPS CORRECT? 
021734 001040 BNE XXB20 * BRANCH IF INCORRECT. 
021736 000445 BR XXBDONE 
THESE ARE DATA TABLES AND A DATA BUFFER. 
021740 023245 KKBTP1: 023245 
021742 026720 26720 
091744 122334 122324 
021746 052672 59672 
021750 123245 XXBTP2: 193245 
021752 026720 26720 
091754 122394 122324 
021756 052672 55672 


REPORT PC INCORRECT AFTER EXECUTION. 
021760 012767 021670 157254 XXB25: MOV AXXB2+2,$TMP4 
021766 012767 021672 157244 MOV #XXB2+4 , STMPS 
021774 104215 1$: ERROR +215 PC NOT INCREMENTED BY 2. 
021776 000425 BR XXBDONE 





“CKFPCCO FPITF FLTG PNT PRT 


4287 

4288 022000 012767 021740 
4289 022006 012767 021750 
4290 022014 104216 

m4 022016 000415 


3 
4294 022020 012767 0 
4295 022026 010067 1 
4296 022032 104217 
4297 022034 000406 


4301 022036 012767 000210 
4302 022044 010567 157172 
ri 14 022050 104220 


4305 022052 
022052 104412 


4306 


157212 


157174 


L_ 8 
C MACRO M1113 O9=APR=81 13:53 PAGE 43-1 
TEST # 462 = SPECIAL DEST, MODE 6, TEST 


SEQUENCE 102 


s.” RESULT INCORRECT: 


KXB10: MOV AXXBTP1,$TMP3 
MOV AXXBTP2,S$TMPS 
1$: ERROR +216 BAD DATA 
BR XXBDONE 
;REPORT RO INCORRECT: 
xXB15: MOV #XXBTP1-5201,$TMP3 
MOV RO,$TMP4 
1$: ERROR +217 SPEC DESTX ROX 
BR XXBDONE 


;REPORT FPS INCORRECT: 


XXB20: MOV #210, $1MP3 
MOV R5,$1MP4 
1$: ERROR +220 
XXBDONE : 
RSE TUP ;GO INITIALIZE THE FPS AND STACK; AND 
;SEE IF THE USER HAS EXPRESSED 
3 THE DESIRE TO CHANGE THE SOFTWARE 
;VIRTUAL CONSOLE SWITCH REGISTER (HAS 
;THE USER TYPED CONTROL G?). 
-ENABL AMA TREENABLE MODE 6 TO MODE 3 CONVERSIONS 





p-—- se 


eee a" FP11F FLTG PNT PRT C 
# 43 = SPECIAL DEST, MODE 7 


rE 
4307 
| 
| 
| 


022054 
8 


4320 022132 


1 
4322 022134 
4323 022136 


4325 022142 


4338 022206 


4341 022210 


4352 022232 
4353 022240 
4354 022246 


170101 


005001 
170770 


170205 


022210 


013737 
013737 
104221 


022210 
022220 
000004 


015627 
022210 005201 
100000 022210 
022136 001236 
000200 


005201 


022210 
022220 
000004 


015027 
000210 


022140 001242 
022142 001240 





8 
tag's O9=APR-81 13:53 PAGE a6 SEQUENCE 


-SBTTL TEST # 43 = SPECIAL DEST, MODE 7, TEST 


MPSS RSaSSAASRSASALSSRLASLERARARS SSSR RRS ESR SRR RRR RRR RRR RRR S ESSE SEE OD 


T*TEST 45 SPECIAL DEST, MODE 7, TEST 


** 

z*THIS IS A TEST OF THE NEGF ABSF AND TSTF DESTINATION FLOWS 
>*MODE 7 USING THE NEGD INSTR. 

DUIS EES SISIIIIIIIIIIIOIIUIOOIOISIOIOOIIOOISIIUIOIUIUIDISIDISEIISIDISSIIEIEIIISISEIIODE 


TST43: SCOPE 


YYB1: 
LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
MOV #YYBTP1,R1 ;SET UP THE DATA BUFFER. 
MOV #YYBTP2,RO 
MOV #4,R2 
1$: MOV (RO) +,(R1)+ 
SOB R2,1$ 
MOV #YYBTP3-5201,R0 
MOV #YYBTP1,5201(RO) 
BIC #100000,YYBTP1 ;MAKE THE OPERAND POSITIVE. 
MOV AYYB2,STMP2 
MOV #200,R1 sSET FD. 
LDFPS R11 
CLR R1 
YYBe: NE GD a5201(RO) s TEST INSTRUCTION. 
STFPS  R5 sGET F 
TST R1 7 WAS THE “pC CORRECT AFTER EXECUTION? 
BNE YYB25 
MOV #YYBTP1,R1 :1S THE RESULT CORRECT. 
MOV #YYBTP2,R2 
MOV #4 RS 
1$: CMP (R1)+, (R2)+ 
BNE YYB10 ;BRANCH IF INCORRECT. 
SOB R3,1$ 
CMP #YYBTP3-5201,RO ;I1S RO CORRECT. 
BNE YYB15 ;BRANCH IF INCORRECT. 
CMP #210,R5 :IS THE FPS CORRECT? 
BNE YYB20 ;BRANCH IF INCORRECT. 
BR Y YBDONE 


; THESE ARE DATA TABLES AND A DATA BUFFER, 
YYBTP1: 023245 


52 
YYBTP2: 123245 


YYBTP3: YYBTP1 
REPORT PC INCORRECT AFTER EXECUTION, 


VYB25: MOV YYB2+2,$1MP4 
MOV YYB2+4 ,STMP5 
1$: ERROR +221 PC NOT INCREMENTED BY 2, 


103 


N 8 
iC Ney FP11F FLTG PNT PRT ates M1113 O9=APR=-81 13:53 PAGE 44-1 SEQUENCE 104 
| 34 # 43 = SPECIAL DEST, MODE 7 TEST 

| 

| 

| 


otha 022250 000425 BR Y YBDONE 
4357 ;REPORT RESULT INCORRECT: 
4358 022252 012737 022210 001240 YYB10: MOV MYYBTP1,$TMP3 
4359 022260 012737 022220 001242 MOV AYYBTP2,$TMP4 
4360 022266 104222 1$: ERROR +222 ;BAD DATA 
| ee 022270 000415 BR Y YBDONE 
4365 ; REPORT i INCORRECT: 
4364 022272 012737 015027 001240 YyyB15: yh ot $TMP3 
4365 022300 010037 001242 MOV $STMP4 
4366 022304 104223 1$: ERROR 0338 ;SPEC DESTX ROX 
aiee 022306 000406 BR Y YBDONE 
4369 ;REPORT FPS INCORRECT: 
4370 022310 012737 000210 001240 YyYB20: MOV #210, $TMP3 
4371 022316 010537 001242 MOV R5,$TMP4 
rh 022322 104224 1$: ERROR +224 
4374 022324 Y YBDONE : 
022324 104412 RSE TUP 3GO INITIALIZE THE FPS AND STACK; AND 


ZSEE IF THE USER HAS EXPRESSED 

;THE DESIRE TO CHANGE THE SOF TWARE 
;VIRTUAL CONSOLE SWITCH REGISTER (HAS 
; THE USER TYPED CONTROL G?). 





fp nO -  -- 


B 9 
CKFPCCO FPTIF FLTG PNT PRT C MACRO M1113 O9=APR=81 13:53 PAGE 45 SEQUENCE 
TEST @ 44 = NEGD, ABSD AND TSTD TEST 
| 6380 .SBTTL TEST # 44 = NEGD, ABSD AND TSTD TEST 
; FF AAAAAARAARAAARAARARAARARTRAARARAARAARARIRARARAAAAAARARAAROARLORTERE 
TSTEST 44 NEGD, ABSD AND TSTD TEST 


:*THIS IS A TEST OF THE NEGD ABSD AND TSTD INSTRUCTIONS. 
-* 


° 
RRR REREREEAEEARAEEARAAAEEARAREHARRERERH HHEHKEREEKRAARAEKRARAHRRAREEE 


022326 000004 15144: SCOPE 
4381 :TEST NEGD WITH POS NONZERO OPERAND 
—-- &382 022330 WW 1: 
022330 104413 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
- —-- &383 022332 «004737 ~023172 JSR PC,NATSUB 
| 4384 022336 000000 1$: ee ZFLAG=NEGD. 
| 4385 022340 016341 23: 16341 *OPERAND. 
4386 022342 055772 55772 
4387 022344 021133 21133 
| 4388 022346 055447 55447 
| 4389 022350 116341 38: 116341 :RESULT. 
4390 022352 055772 55772 
2354 021133 21133 
4392 022356 055447 55447 
4393 022360 016341 4$: 16341 :ERROR RES. 
4394 022362 055772 55772 
4395 022364 021133 21133 
4396 0223606 055447 55447 
4397 022370 000207 5$: 207 sFPS BEFORE EXECUTION. 
4398 022372 000210 210 “FPS AFTER EXECUTION. 
4399 022374 000200 200 TERROR FPS. 
4400 022376 177777 -1 FEC 
4401 022400 104200 6$: ERROR +200 TE10<=--E10*200xK ST 336 
4402 022402 401 BR 7$ 
4403 022404 104201 ERROR +201 :BUT ENBT ST 336X WENT TO 053 INTO 453 
4404 022406 7$: 
4405 :TEST NEGD WITH NEG OPERAND. 
4406 022406 WWB2 : 
022406 104413 LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
4407 022410 004737 023172 JSR PC,NATSUB 
4408 022414 000000 1$: 0 :FLAG=NEGD. 
4409 022416 152525 2$: 152525 * OPERAND . 
4410 022420 053545 53545 
4411 022422 055565 55565 
4412 022424 057505 57505 
4413 022426 052525 3$: 52525 :RESULT. 
4414 022430 053545 53545 
4415 022432 055565 55565 
4416 022434 057505 57505 
4417 022436 152525 4$: 152525 :ERROR RES. 
4418 022440 053545 53545 
4419 022442 055565 55565 
4420 022444 057505 57505 
4421 022446 000217 S$: 217 :FPS BEFORE EXECUTION. 
4422 022450 000200 200 ‘FPS AFTER EXECUTION. 
4423 022452 000210 210 TERROR FPS. 
4424 022654 177777 =] FEC 
4425 022456 104200 6$: ERROR +200 *E10<=--E10*200xX $336 


4426 022460 BR 
4427 022462 104202 ERROR +202 ;BUT ENBT X ST336 TO 453 INTO 053 





105 


c-- Chr 





TEST 


“tse 022464 
4430 022464 


4452 022542 
4454 022542 


447 606 
4472 022610 
4473 022612 
4476 022620 
4477 
4478 022620 
022620 
4479 022622 
4480 022626 
4481 022630 


ABSD AND TSTD T 


104171 


104413 
stat th 


00000 
012321 


CKFPCCO FRI1IF FLTG PNT PRT C 
# 44 = NEGD, 


023172 


023172 


023172 


. 
a M1113 O9=APR=81 13:53 PAGE 45-1 
Ss 


7$: 
;TEST ABSD WITH POSITIVE OPERAND 
wWB3: 


LPERR 
"a PC ,NATSUB 


3$: 60705 
4$: 160705 
S$: 217 


63: ERROR 
5R 
ERROR 


JSR PC ,NATSUB 


3$: 54345 
4$: 154345 
5$: 


6$: ERROR 
BR 
ERROR +17; 
7$: 
z TEST WITH POSITIVE OP 
WWBS5: 


LPERR 
JSR PC ,NATSUB 


2$: 12321 


SEQUENCE 


SET UP THE LOOP ON ERROR ADDRESS. 


;FLAG=ABSD. 
SOPERAND. 


RESULT. 


;ERROR RES. 


FPS BEFORE EXECUTION. 


FPS AFTER EXECUTION. 
TERROR FPS. 
SEITHER BUT O 
:BUT ST 055 70. 336 INTO 335 


OR BUT ENBT ST 335 TO 452 INTO 052 


;SET UP THE LOOP ON ERROR ADDRESS. 


;FLAG=ABSD. 
;OPERAND. 


RESULT. 


ERROR RES. 


sFPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
ERROR FPS. 


3E10*E10*200X ST 452 


SET UP THE LOOP ON ERROR ADDRESS. 


3FLAG=TSTD. 
;OPERAND. 


CKFPCCO FRTIF FLTG PNT PRT C 


TEST # 44 = NEGD, ABSD AND TSTD TEST 


4482 022632 
| = 4483 022634 
4484 636 


4500 022676 
4502 022676 


‘ess 022754 
4526 022754 


012321 3$: 

112321 4$: 
54 

5$: 


104205 6$: 


ee 
MACRO M1113 O9=APR=81 13:53 PAGE 45-2 


ERROR +205 
BR 7$ 
ERROR +206 


7$: 
;TEST TSTD WITH NEG OP 
WWR6: 


023172 


WN 
RONIW 


123765 3$: 
023765 4$: 
04 

000207 5$: 


104207 6$: 


004737 023172 


LPERR 
JSR PC ,NATSUB 


ERROR ad 
ERROR +210 


JSR PC ,,NATSUB 


SEQUENCE 


RESULT. 
ERROR RES. 


FPS BEFORE EXECUTION. 

3FPS AFTER EXECUTION. 

ERROR FPS. 

;BUT (OP1B) X ST044 TO 336 INTO 334 


;BUT ENBT ST 334 TO 453 INTO 053 


;SET UP THE LOOP ON ERROR ADDRESS. 


;FLAG=TSTD. 
; OPERAND. 


sRESULT. 
ZERROR RES. 


FPS BEFORE EXECUTION. 

FPS AFTER EXECUTION. 

ERROR FPS. 

;BUT OPB1 ST 055 TO 335 INTO 334 


;BUT ENBT ST 334 TO 053 INTO 453 


;SET UP THE LOOP ON ERROR ADDRESS. 


sFLAG=TSTD. 
; OPERAND. 


sRESULT. 


107 


<FPCCO FRIIF FLTG PNT PRT C 
TEST @ 44 = NEGD, ABSD AND TSTD TEST 


e 
MACRO M1113 O9-APR=81 13:53 PAGE 45-3 


SEQUENCE 


4537 0230046 00000C 4$: 0 ;ERROR RES. 
4538 023006 000000 0 

9 023010 000000 0 
4540 023012 000000 0 
4541 023014 000200 5$: 200 3FPS BEFORE EXECUTION. 
4542 023016 000204 204 sFPS AFTER EXECUTION. 
4543 023020 000214 214 sERROR FPS. 
4544 023022 177777 - 
4545 023024 104211 6%: ERROR +211 ;BUT OP1B ST 255 TO 311 OR 312 INTO 310 
4546 023026 01 BR 7$ 
4547 023030 104212 ERROR +212 :BUT ENBT ST 310 TO 402 INTO 002 
4548 023032 7$: : 
4549 :TEST TSTD -0 UP FIUV=0 
4550 023032 WWRB : 

023032 104413 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
4551 023034 004737 023172 JSR PC,NATSUB 
4552 023040 2 1$ 2 sFLAG=TSTD. 
4553 023042 100123 2$ 100123 : OPERAND. 
4554 023044 021012 21012 
4555 0230466 034565 34565 
4556 023050 043210 43210 
4557 023052 100123 3$: 100123 ;RESULT. 
4558 023054 021012 21012 
4559 023056 034565 34565 
4560 023060 043210 43210 
4561 023062 000000 4$: 0 sERROR RES. 
4562 023064 000000 0 
4563 023066 000000 0 
4564 023070 000000 0 ; 
4565 023072 040203 S$ 40203 3FPS BEFORE EXECUTION. 
4566 023074 040214 040214 FPS AFTER EXECUTION. 
4567 023076 140214 140214 sERROR FPS. 
4568 023100 177777 - 
4569 023102 104211 6$: ERROR +211 z+ 
4570 023104 000401 iste 7$ 
4571 023106 104213 ERROR +213 :BUT FIUV ST 257 TO 355 INTO 255 
4572 023110 7$: 
4573 ;TEST TSTD -O OP FIUV=1 
4574 023110 WWBY: 
023110 104413 LPERR :SET UP THE LOOP ON ERROR ADDRESS. 

4575 023112 004737 023172 JSR PC,NATSUB 
4576 023116 000002 1$: sFLAG=TSTD. 
4577 023720 100137 2$: 100137 ;: OPERAND. 
4578 023122 024613 24613 
4579 023124 057024 57024 
4580 023126 060137 0137 
4581 023130 100137 3$: 100137 ;RESULT. 
4582 023132 024613 24613 
4583 023134 057024 57024 
4584 023136 060137 60137 
4585 023140 000000 4$: 0 ERROR RES. 
4586 023142 000000 0 
4587 023144 0 
4588 023146 000000 0 
4589 023150 044200 5$: 44200 sFPS BEFORE EXECUTION. 
4590 023152 144214 144214 sFPS AFTER EXECUTION. 
4591 023154 044214 044214 ERROR FPS. 


108 
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TEST # 44 = NEGD, ABSD AND TSTD TEST 


4592 023156 000014 14 

4593 023160 104271 6$: ERROR +211 3+ 

4594 023162 000401 BR 7$ 

4595 023164 104214 ERROR +214 ;BUT Fluv ST 257 TO 255 INTO 355 

4596 023166 7$: 

rf 44 023166 000137 023606 JMP WwBDONE 

4599 THIS SUBROUTINE, NATSUB, IS USED TO SET UP THE OPERANDS, EXECUTE 
4600 ZTHE EITHER A TSTD, AN ABSD OR A NEGD INSTRUCTION AND CHE CK THE RESULTS. A CALL 
4601 ;T0 IT IS MADE THUS: 

4602 : 

4603 ; JSR PC ,NATSUB 

4604 : FLAG: . WORD x s INSTRUCTION TYPE FLAG. 
4605 : ACARG . WORD KLX,X x 7 OPERAND 

4606 ; RES: .~ WORD = eS sEXPECTED RESULT 

4607 : ERRES . WORD MLM LX LM sERROR RESULT 

4608 FPSB: .~ WORD x sFPS BEFORE EXECUTION 
4609 : FPSA . WORD x sFPS AFTER EXECUTION 
4610 : FEC: .~ WORD Xx sEXPECTED FEC 

4611 : ERFPS: .WORD Xx sERROR FPS. 

4612 ERR1: ERROR +X :DATA ERROR. 

4613 ; BR CONT 

4614 . ERR2: ERROR +X sFPS ERROR. 

rr £4 5 CONT: RETURN ADDRESS 

4617 ; THE OPERAND IS SET UP IN NATBF1. THEN 

4618 + THE EITHER THE TSTD, NEGD OR ABSD INSTRUCTION IS EXECUTED. 

4619 *NATSUB USES THE FIRST OPERAND AS A FLAG TO 1 pata WHICH INSTRUCTION 
4620 :1S TO BE EXECUTED: 0 = NEGD, 1 = ABSD, STD. 

4621 * THE RESULT IS CHECKED AGAINST RES. IF THE “RESULT IS CORRECT THEN THE FPS IS 
4622 : COMPARED WITH FPSA. IF THIS TOO IS CORRECT NATSUB RETURNS CONTROL 
4623 :TO THE CALLING ROUTINE AT CONT. IF THE FPS IS BAD NATSUB 

4624 * COMPARE IT TO ERROR FPS. IF THIS MATCHES THEN ht WILL RETURN 
4625 :70 THE ERROR CALL AT ERR2, OTHERWISE NATSUB ITSELF 

4626 “REPORTS THIS FAILURE AND THEN RETURNS TO CONT. IF THE RESULT OF THE 
4627 * INSTRUCT ION IS INCORRECT, THE INCORRECT RESULT IS COMPARED WITH THE 
4628 sANTICIPATED FAILING DATA PATTERN, ERRES. IF THE FAILURE IN 

4629 ; THE RESULT WAS ANTICIPATED CORRECTLY TO BE ERRES THEN NATSUB 

4630 WILL TRANSFER CONTROL TO THE ERROR CALL AT ERR1. OTHERWISE THE 

4631 :RESULT WAS INCORRECT BUT WAS NOT ANTICIPATED AND NATSUB WILL 

4632 * REPORT THE FAILURE AFTER WHICH CONTROL WILL BE PASSED TO CONT. 

dese 

4 

4635 023172 012601 NATSURB: MOV (SP)+,R1 ;GET A POINTER TO THE ARGUMENTS 
4636 023174 010102 MOV R1,R2 ; COPY THE OPERAND . 

4637 023176 062702 000002 ADD #2,R2 

4638 023202 012703 023574 MOV #NATBF1.R3 

4639 023206 012704 000004 MOV #4 RS 

4640 023212 012223 1$: MOV (R2)+,(R3)+ 

4641 023214 077402 SOB R4,1$ 

4642 023216 016100 000032 MOV 32(R1),RO sLOAD THE FPS. 

4643 023222 170100 LDFPS RO 

4644 023224 012700 023574 ' MOV #NATBF1,RO :SET UP THE OPERAND ADDRESS. 

4645 023230 011102 MOV (R1),R2 :GET THE FLAG TO DETERMINE WHICH 

4646 023232 006302 ASL R2 : INSTRUCTION TO EXECUTE. 

4647 023234 006302 ASL R2 :0 = NEGD, 7 = ABSD, 2 = TSTD 


4648 023236 012703 023252 MOV #NATINS ,R3 


023242 


CKFPCCO FRIIF FLTG PNT 
TEST # 64 = NEGD, 


ABSD 


060202 
010337 
000113 
170710 
000403 
Lveny 


00040 
170510 


077303 
000161 
000115 


026105 


PRT C 


001236 


000034 
000034 
000040 
000050 


023524 


000022 
023574 
000004 


000042 


000036 


001242 
001252 


NATINS: 


2$: 


3$: 


4$: 


: THE RESULT 
cSEE IF THE 
10$: 


11$: 
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AND TSTD TEST 


R2,R3 
R3.$TMP2 
(R3) 


» $TMP5 
#NATBF 1,$TMP4 
R4, $TMP? 
34(R1) , $TMP10 


44,R 
(RO) +, (R2)+ 
10$ 


R3,3$ 
34(R1) ,R4 
15$ 
34(R1) 

4$ 
40(R1),R5 
20$ 
50(R1) 


(R1),R5 

R5 

R5 
ANATERI,RS 
R1 »RO 
#22,R0 
#NATBF 1,R2 
#4 ,R3 
(RO) +, (R2)+ 
12$ 

R3,11$% 


SEQUENCE 


3GO EXECUTE THE INSTRUCTION. 


:GET THE FPS. 
ZGET THE FEC. 


sWAS THE RESULT CORRECT? 


;BRANCH IF INCORRECT. 


;WAS THE FPS CORRECT? 
;BRANCH IF INCORRECT 


IF THE EXPECTED FPS WAS NEGATIVE CHECK THE FEC. 


;WAS THE FEC CORRECT. 
;BRANCH IF INCORRECT. 
RETURN. 


WAS INCORRECT BUT WAS THIS FAILURE ANTICIPATED? 
RESULT WAS ANTICIPATED: 


;BRANCH IF NOT ANTICIPATED. 


THE ERROR WAS ANTICIPATED SO RETURN. 
JMP 42(R1) 


jog _. WAS a 4 Fahad aa ert IT HERE. 


7; THE FPS WAS st oe: TH 
15$: 36¢ 


CMP 


R1),R5 


TO THE PROPER ERROR CALL. 


WAS THIS ERROR ANTICIPATED? 


110 
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CKFPCCO FRIIF FLTG PNT PRT C 
TEST # 44 = NEGD, ABSD AND TSTD TEST 


4706 023454 
a4 
ee 023456 


] 
4712 023462 


| 4716 023474 


| 4719 023476 


023522 


4728 023524 


4733 023536 


* 
N 
as) 
vw 


4736 023542 


4741 023554 


4744 023556 


4749 023570 


0 
4751 023572 
it 023574 


4754 023606 
023606 


001002 


000161 


011102 


000112 


016137 


000112 


104165 


000161 


104170 


177777 
177777 


104412 


000046 


023542 


000040 
001254 


023556 


000050 


177777 


MACRO M1113 09=APR=81 


001256 


177777 


BNE 


H 9 
13:53 PAGE 45-6 SEQUENCE 


16$ ;BRANCH IF NOT ANTICIPATED. 


;THE FPS ERROR WAS ANTICIPATED SO RETURN. 
JMP 46(R1) 


3; THE FPS FAILURE WAS NOT ANTICIPATED SO REPORT IT HERE. 
16$: M (R1),R2 


OV RI), 
ASL Rez 
ASL R2 
ADD ANATER2,R2 
JMP (R2) ;GO TO THE PROPER ERROR CALL. 
sREPORT THAT THE FEC “i INCORRECT. 
20$: MOV 40(R1) MP12 
MOV R5, ALERT te 
MOV (R1) ,R2 
ASL 2 
ASL R2 
ADD ANATER3,R2 
JMP (R2) :GO TO THE PROPER ERROR CALL. 
; THESE ARE THE ERROR CALLS FOR no INDIVIDUAL INSTRUCTION AND CONDITION. 
NATER1: ERROR +165 NEGD BAD DATA 
BR NATRET 
ERROR +166 ;ABSD BAD DATA 
R NATRET 
ERROR +167 ;TSTD BAD DATA 
NATRET: JMP 50(R1) 
sFPS INCORRECT: 
NATER2: ERROR +170 ;NEGD FPSX 
BR NATRET 
ERROR +171 sABSD FPSX 
BR NATRET 
ERROR +172 ;TSTD FPSX 
BR NATRET 
sFEC INCORRECT: 
NATER3: ERROR +173 sNEGD FECX 
BR NATRET 
ERROR +174 ;ABSD FEC 
BR NATRET 
ERROR +175 :TSTD FECX 
BR NATRET 


. WORD 
NATBF1: .WORD 


ONE : 
RSE TUP 


-1 
-1,-1,-1,-1,-1 


3GO INITIALIZE THE FPS AND STACK; AND 
SEE IF THE USER HAS EXPRESSED 

; THE DESIRE TO CHANGE THE SOF TWARE 
:VIRTUAL CONSOLE SWITCH REGISTER (HAS 
; THE USER TYPED CONTROL G?). 


CKFPCCO FRTIF FLTG PNT PRT C 


TEST # 45 = SOURCE MODES, 


4764 


023610 
5 


66 
4767 023612 
023612 


4793 023712 
4796 023714 
4799 023730 
800 

4804 023732 
4805 023732 


4806 023734 
4807 023740 


4811 023754 





000004 


104475 
012700 


170110 
170205 
020027 


177777 
147517 
177777 


012737 


012737 
010537 


022626 


MODE 7 (FL=0) 


023672 
147517 
147517 
023646 
023732 


023672 
147517 


023672 
001242 


147517 
001242 


023650 
023652 
047302 
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001240 
001236 
000604 


001240 


001240 


-SBTTL TEST # 45 = SOURCE MODES, MODE 1 (FL=0), TEST 


SF RAAREAAAEAAAAARAAARAARARARERAERRAAEARHAARAORRRAAHAAHHARAARARAERAERARES 


T*TEST 45 


SOURCE MODES, MODE 1 (FL=0), TEST 


7* THIS IS A TEST OF SOURCE MODE 1 
3* USING THE LDFPS INSTR 


. 
COPA P PSR ESRB RS RRR RRR RRR RRR RRR RRR RRR RRR RRR RRR RRR RRR RRR RRR SERRE SSD SD 


1S145: SCOPE 


AAC1: 


AAC2: LDFPS 
STFPS 


;SET UP THE LOOP ON ERROR ADDRESS. 


MAACTP1,RO :SET UP TEST DATA IN BUFFER. 
#147517, (RO) 
#147517,$TMP3  ;SAVE DATA IN CASE OF ERROR. 


#AAC2, $TMP2 
wanced, ERRVECT ;SET UP FOR TRAPS T0 4. 
(R STEST INSTRUCTION. 


R5 ;GET FPS 

RO, + eli :IS rt CORRECT? 
AAC10 BR IF NOT. 

ereane § RS sis iPS CORRECT? 
AACI [BR IF NOT. 
AACDONE 


3 TEST BUFFER AND DATA: 


-1 
AACTPI: 147517 


;REPORT RO INCORRECT. 


AAC10: MOV 
MOV 

1$: ERROR 
BR 


MAACTP1,$TMP3 


+225 :RO BAD BUT FSRC FAILED 
AACDONE 


sREPORT FPS INCORRECT. 


AAC11: MOV 
MOV 

1$: ERROR 
BR 


4 yg fale $TMP3 ;REPORT FPS INCORRECT. 
R5,$1MP 

+226 

AACDONE 


; TRAP HERE THROUGH VECTOR FOUR, SEE IF THE TRAP WAS DURING 
EXECUTION OF THE FPS INSTRUCTION BEING TESTED. IF SO REPORT 
a OTHERWISE GO TO THE SPURIOUS TRAP TO 4 HANDLING. 


(SP) ,R2 
Be AMAL ECS 


R2, MAAC 2+4 
1$ 


CPSPUR 
(SP)+,(SP)+* 


SEQUENCE 


112 


CKFPCCO FRTIF FLTG PNT PRT C 
TEST # 45 = SOURCE MODES, MODE 1 (FL=0), TES 


4812 023756 

4813 023762 

4814 023764 

4815 

4816 023766 
023766 


4817 
4818 


010237 007236 
104227 
000400 


104412 


 . 
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MOV R2,$TMP2 


2$: FRROR +227 :ODD ADRES 
BR AAC DONE ‘BUT FDSTX IN ST 771 
AACDONE : 
RSE TUP :GO INITIALIZE THE FPS AND STACK; AND 


SEE If THE USER HAS EXPRESSED 

THE DESIRE TO CHANGE THE SOF TWARE 
SVIRTUAL CONSOLE SWITCH REGISTER (HAS 
3 THE USER TYPED CONTROL G?). 


9 
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_ TEST # 466 = SOURCE MODES, MODE 2 (FL=0) 





4819 .SBTTL TEST # 46 = SOURCE MODES, MODE 2 (FL=0), TEST 


CRP ee ERRRRRSRARASRARARRRRRRR RRS RRR SRRR RRR RSA RR RR RRR RARER ASSESS SD! 


TeTEST 46 SOURCE MODES, MODE 2 (FL=0), TEST 


t® THIS IS A TEST OF SOURCE MODE 2 
S® USING THE LDFPS INSTR 
“* 

* TOR RBARABBEBBABARASRERAASBRBASBARASAARARARALSASSESES ESSERE SRR SER RR RAR AR SAAS SAS SF 


023770 000004 15146: SCOPE 
4820 
4821 023772 BBC1: 
4822 023772 104413 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
4823 023774 012700 024052 MOV ABBCTP1,RO :SET UP TEST DATA IN BUFFER. 
4824 024000 012710 145212 MOV #145212. (RO) 
4825 024004 012737 145212 001240 MOV #145212.$TMP3 |: SAVE DATA IN CASE OF ERROR. 
4826 024012 012737 024026 001236 MOV ABBC 2, $TMP2 
4827 024020 012737 024112 000004 MOV #BBC20,ERRVECT ;SET UP FOR TRAPS TO 4. 
4829 024026 170120 BBC2: LDFPS (RO)+ : TEST INSTRUCTION. 
4831 024030 170205 STFPS RS :GET FPS 
4833 024032 020027 024054 CMP RO,ABBCTP1+2 =: IS RQ CORRECT? 
4834 024036 001007 BNE BBC10 ‘BR IF NOT. 
4835 024040 022705 145212 CMP #145212,R5 :1S THE FPS CORRECT? 
4836 024044 001013 BNE BBC11 =BR IF NOT. 
4837 024046 000436 BR BBCDONE 
4838 
4839 
4840 TEST BUFFER AND DATA: 
4841 024050 177777 a} 
4842 024052 177777 BBCTP1: .WORD -1 
4843 024054 177777 ~] 
4844 
48465 
4846 ; REPORT 4 INCORRECT. 
4847 024056 012737 024054 001240 ®8BC10: WEBCTP #2. $IMP3 
4848 024064 010037 001242 mov TMP4 
4849 024070 104230 1$: ERROR R80 :ROQ BAD BUT FSRC FAILED 
4850 024072 000424 BR BBCDONE 
4852 :REPORT FPS INCORRECT 
4853 024074 012737 145212 001240 BBC11: MOV #145212, STMP3 ;REPORT FPS INCORRECT. 
4854 024102 010537 001242 MOV RS, $TMP4 
4855 024106 104231 1$: ERROR +231 
4856 024110 000415 BR BBCDONE 
4858 ; TRAP HERE THROUGH VECTOR FOUR. SEE IF THE TRAP WAS DURING 
4859 “EXECUTION OF THE FPS INSTRUCTION BEING TESTED. IF SO REPORT 
4860 ‘FAILURE. OTHERWISE GO TO THE SPURIOUS TRAP TO 4 HANDLING. 
4861 024112. - BBC20: 
4862 024112 011602 MOV (SP) ,R2 
4863 024114 020227 024030 CMP R2,ABBC2+2 
4864 024120 001405 BEQ 1$ 
4865 024122 020227 024032 CMP R2,ABBC2+4 
4866 024126 001402 BEQ 1$ 


114 


CKFPCCO FRIIF FLTG PNT PRT C 
TEST # 46 = SOURCE MODES, MODE 2 (FL=0), TEST 


4867 024130 
4870 024142 
4871 
4872 
4873 024144 


024144 


4874 
4875 


000137 047302 
022626 
010237 001236 
104232 


104412 
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1$: 
2$: 


BBCDONE : 


CPSPUR 
(SP)+,(SP)+ 
R2,$TMP2 
+232 


:ODD ADRES 
“BUT FDSTX IN ST 771 


3GO INITIALIZE THE FPS AND STACK; AND 
SEE IF THE USER HAS EXPRESSED 

3 THE DESIRE TO CHANGE THE SOFTWARE 
7VIRTUAL CONSOLE SWITCH REGISTER (HAS 
; THE USER TYPED CONTROL G?). 


SEQUENCE 


115 


/CKFPCCO FPIIF FLTG PNT PRT C 


4876 


024146 
487 
4878 024150 
024150 


4879 
4880 024152 


4891 024226 
4892 

4893 024230 
4894 024240 
4895 024242 


4896 
4897 024252 


4914 024340 
024340 


000004 


104413 
012700 


177777 
177777 
177777 


012737 


104235 
104412 


024242 


0243506 


024240 
105252 


177777 
177777 
024240 
001242 


105252 
001242 


024210 
024212 
047302 
001236 
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TEST # 47 = SOURCE MODES, MODE 4 (FL=0), 


177776 


000004 


177777 
177777 
001240 


001240 


TEST 
~SBTTL 


TeTEST 47 
7* 


SEQUENCE 116 


TEST # 47 = SOURCE MODES, MODE 4 (FL=0), TEST 


TOR PERE SSSESESSLLLAL SSE REESE R ESSERE SSR SRSA RAR ASRS SA SSSA SASS R ASAE SSS 


SOURCE MODES, MODE 4 (FL=0), TEST 


THIS IS A TEST OF SOURCE MODE 4 


TST47: 
DDC1: 


DDC2: 


DDCTP1: 


DDC10: 
1$: 
DDC11: 
1$: 
DDC20: 


1$: 


2$: 
DDCDONE : 


of 
;* USING THE LDFPS INSTR 
-* 


SCOPE 


LPERR 


MOV —-ADDCTP1+2,R0 

MOV #105252,-2(R 

MOV BIOSDS9.STMPS. 

MOV - ADDC2, STMP2 

MOV —- ADDC20, ERRVEC 

LDFPS =<RO) 

S R5 

CMP =—s« RO, ADDCTP1 
pdC10 

(MP = #105252,R5 

BNE DDC11 

BR DDCDONE 

=1,-1,-1,-1 

-1,-1,-1,-1 


MOV ADDCTP1,$TMP3 
MOV me $TMP4 


ERROR 

BR 

MOV OSeSD, $TMP3 
MOV RS, $TMP4 
ERROR +234 

R DDCDONE 

MOV (SP) .R 


2 
R2 ,ADDC2+2 


CMP 
BEQ 1$ 

CMP R2,ADDC2+4 
BEQ 1$ 
JMP CPSPUR 

CMP (SP) +, (SP)+ 
MOV R2 $TMP2 
ERROR +235 

SETUP 


POP CESESESASSSASASE SELES ES ESE SERRE SSR RSS SERRA RRR R RARER ARRAS RRS DD S| 


;SET UP THE LOOP ON ERROR ADDRESS. 
;SET UP THE TEST DATA BUFFER. 
SAVE DATA IN CASE OF ERROR. 


;RO BAD BUT FSRC FAILED 
REPORT FPS INCORRECT. 


;DDD ADRES 


3GO INITIALIZE THE FPS AND STACK; AND 
7SEE IF THE USER HAS EXPRESSED 

7 THE DESIRE TO CHANGE THE SOF TWARE 
;VIRTUAL CONSOLE SWITCH REGISTER (HAS 
; THE USER TYPED CONTROL G?). 


-----_—_--- -------— - -- 


| CKFPCCO FP11F FLTG PNT PRT C 


TEST # 50 = SOURCE MODES, 


4915 


: 


024342 


4929 024426 


4933 024430 


4936 024450 


4940 024462 
4941 024470 
4942 024474 
4943 024476 


4949 024514 


4953 024516 


4962 024550 


000004 
104413 


177777 
177777 
177777 
024440 


012737 


MODE 3 (FL=0), 


024450 


024406 
024516 
024452 
103456 


177777 


177777 
177777 


024452 
001242 


103456 
001242 


024410 
024412 
047302 
001236 
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024440 
001240 
001236 
000004 


177777 


177777 
177777 


001240 


001240 


TEST SEQUENCE 117 


-SBTTL TEST # 50 = SOURCE MODES, MODE 3 (FL=0), TEST 


5 AAA ARAEEEERERERAEKREKRAO REE ARERR EERE EE 


seTeSt 50 SOURCE MODES, MODE 3 (FL=0), TEST 
ce THIS IS A TEST OF SOURCE MODE 3 
3* USING THE LDFPS INSTR 
+ 
TUES OIOIIEIEIIIISI IOS IIIIIIOIUIOIUIUISIIIIIIOOIOOIDDDIDUIDIUIUISIIIOOUO ONO 
Lelee" SCOPE 
LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
MOV MEECTP2,RO 
MOV #MEECTP1, (RO) 
MOV #103456, EECTP1 
MOV #103456, $TMP3 
MOV MEEC2, STMP2 
MOV MEEC2O,ERRVECT ;SET UP FOR TRAPS TO 4. 
EEC2: LDFPS a@(RO)+ 413 FP ol te 
STFPS R5 ZGET T HE FPS. 
CMP RO ,MEECTP2+2 31S RO CORRECT? 
BNE EEC : IF NOT. 
CMP #103456,R5 31S THE FPS CORRECT? 
BNE EEC11 ;BR IF NOT. 
BR EECDONE 


: TEST BUFFER _ DATA: 


EECTP1: - gn 

EECTP2: EECTP1,-1,-1.-1, 

;REPORT RO INCORRECT. 

EEC10: MOV HEECTP2+2,$1MP3 
MOV RO, $TMP4 

1$: ERROR +236 :RO BAD BUT FSRC FAILED 
BR EE CDONE 

;REPORT FPS INCORRECT. 

FEC11: MOV #103456,$TMP3 REPORT FPS INCORRECT. 
MOV RS, $TMP4 

1$: ERROR +287 


BR EECDONE 
; TRAP HERE THROUGH VECTOR FOUR. SEE IF THE TRAP WAS DURING 


sEXECUTION OF THE FPS INSTRUCTION BEING TESTED. 


IF SO REPORT 


sFAILURE. OTHERWISE GO TO THE SPURIOUS TRAP TO 4 HANDLING. 
EEC20: MO (SP) ,R 


V 
CMP Re ,AEEC2+2 
BEQ 1$ 
CMP Re ,MEEC2+4 
BEQ 1$ 
JMP CPSPUR 
1$: CMP (SP) +, (SP) + 
MOV Re, $TMP2 
e$ ERROR +240 :DDD ADRES 


B 10 [ 
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T # 5O = SOURCE MODES, MODE 3 (Fi=0), TEST 1 
024550 104412 RSE TuP :GO_ INITIALIZE THE FPS AND STACK; AND 


sSEE IF THE USER HAS EXPRESSED 

TTHE DESIRE TO CHANGE THE SOF TWARE 

: VIRTUAL CONSOLE SWITCH 3 pape (HAS 
;THE USER TYPED CONTROL G?) 


| ¢ 10 
CKEPCCOLFPIIE FLIG PNT PRTC MACRO W113. O9-APR-BT 13: 53 PAGE 50 SEQUENCE 119 
# 51 = SQURCE MODES, MODE 5S (FL=0), 


4963 -SBTTL TEST # 51 = SOURCE MODES, MODE 5 (FL=0), TEST 


tPA RRR RRRRRRRRRRRRRRRRRRRRRRRRRARSAR ERAS RRR RRR RR RARER RR SAR RRR SS DS 


SeTEST $1 SOURCE MODES, MODE 5 (FL=0), TEST 


ts THIS IS A TEST OF SOURCE MODE 5 
| -# USING THE LDFPS INSTR 


Lee eee eee eae eee neeeeneeeeeenOeneeeeKeHeeeeneReneeeneeneeeeenenes 
024552 000004 1ST51: SCOPE 
| 4964 024554 FFCI: 
024554 104413 LPERR 7SET UP THE LOOP ON ERROR ADDRESS. 

4965 026556 012700 024656 MOV MFFCTP2*2,RO SET UP THE TEST DATA BUFFER. 
| = 4966 «024562 012760 0246644 177776 MOV BFF CTP1,-2(RO) 
| 4967 026570 012737 045412 024644 MOV #65412, FFCTPI 

4968 024576 012737 045412 001240 MOV #45412, $TMP3 ;SAVE DATA IN CASE OF ERROR. 

4969 024606 012737 024554 001236 MOV aFFC1,STMP2 

4970 024612 012737 024720 000004 MOV #FFC2O,ERRVECT :SET UP FOR TRAPS TO 4. 

4971 024620 170150 FFC2: LDFPS a-(RO) sTEST INSTRUCTION. 

4972 024622 170205 STFPS RS “GET THE FPS. 

4973 024624 020027 024654 CMP RO. ar FCTP2 SIS RO CORRECT? 

4974 024630 001015 QNE C10 :BR IF NOT. 

4975 024632 022705 045412 CMP weSéh2, RS sIS THE FPS CORRECT? 

4976 024636 001021 BNE FFCI “BR IF NOT. 

4977 024640 000444 BR + EDONE 

4978 

4979 

4980 ZTEST BUFFER AND DATA: 

4981 024642 177777 -1 

4982 024644 177777 FFCTPI: <1 

4983 024646 177777 177777 177777 =}. =1,<1 

498% 024654 024644 177777 177777 FECTP2: FFCTPI,-1,-1,-1 

4986 

4987 ;REPORT RO INCORRECT. 

4988 024664 012737 024654 001240 FFC10: MOV #FFCTP2,STMP3 

4989 024672 010037 001242 MOV RO, STMP 

4990 024676 104241 1$: ERROR +261 :RO BAD BUT FSRC FAILED 

4991 024700 000424 BR FF CDONE 

4993 :REPORT FPS INCORRECT 

4994 024702 012737 045412 001240 FFC11: MOV #65412, STMP3 zREPORT FPS INCORRECT. 

4995 024710 010537 001242 MOV R5,$TMP4 

4996 024714 104242 1$: ERROR +242 

4997 024716 000415 BR FF CDONE 

4998 7 TRAP HERE THROUGH VECTOR FOUR. SEE IF THE TRAP WAS DURING 

4999 TEXECUTION OF THE FPS INSTRUCTION BEING TESTED. IF SO REPORT 

5000 > FAILURE. OTHERWI SE GO TO THE SPURIOUS TRAP TO 4 HANDLING. 

5001 024720 011602 FFC20: MOV (SP) ,R2 

5002 024722 020227 024622 CMP Re. AFF C22 

5003 024726 001405 BEQ 1$ 

5004 024730 020227 024624 CMP R2 AFF C2+4 

5005 024734 001402 BEQ 1$ 

5006 024736 000137 047302 IMP CPSPUR 

5007 024742 022626 1$: CMP (SP) +, (SP) 

5008 024744 019237 001236 MOV R2,$TMP2 

5009 024750 104243 23: ERROR +243 :0DD ADRES 


5010 024752 FF CDONE : 


--———_——— oe Ce 


| D 10 
/CKFPCCO FRIIF FLTG PNT PRT C MACRO M1113 O9=4PR=-81 13:53 PAGE 50-1 
TEST # 51 = SOURCE MODES, MODE 5 (Fi=0), TEST 

024752 104412 RSE TUP 3GO INITIALIZE THE FPS AND STACK; AND 
SEE IF THE USER HAS EXPRESSED 
7; THE DESIRE TO CHANGE THE SOF TWARE 
:VIRTUAL CONSOLE SWITCH REGISTER (HAS 
THE USER TYPED CONTROL G?). 


SEQUENCE 


120 


a | 


5014 


> 024754 
5013 024756 


7 
5058 025144 


177777 
177777 
177777 


012767 
010067 
104244 
0004 34 


012767 
010467 
104245 
000425 


012767 
012767 
104246 
000415 


011602 
020227 
001405 


CKEPCCO FRTTIE FLTG PNT PRT 
TEST # 52 = SOURCE MODES, 


025016 


025736 
005201 


917647 
046543 


177777 


7647 
4146 


—O 
wn— 


046543 
154130 


025022 
025020 


025020 


E 10 
MACRO M1113 O9=APR-B1 13:53 PAGE 51 
MODE 6 (FL=0), 


900056 
154260 
154230 


152766 


177777 


154150 


154132 


SEQUENCE 121 


TEST 

-SBTTL TEST # 52 = SOURCE MODES, MODE 6 (FL=0), TEST 

RARER AHAHEEREEAAER EAE AEHTEAHERHHRAEH RHEE RHR eA Ree eee 
s*TEST 52 SOURCE MODES, MODE 6 (FL=0), TEST 


t* THIS IS A TEST OF SOURCE MODE 6 
[* USING THE LDFPS INSTR 
lal 


= SRA HARRERHRAREEEERAE HEHEHE HEHRHEERHHReRKetaeneeaeaeneaee 


#5152: SCOPE 
i -DSABLE AMA :DISABLE MODE 6 TO MODE 3 CONVERSIONS 
"  LPERR :SET UP THE LOOP ON ERROR ADDRESS. 


MOV #GGCTP1=5201,R0 :SET UP THE TEST DATA BUFFER. 


MOV #46543,GGCTPI 
MOV #46543, $TMP3 ;SAVE DATA IN CASE OF ERROR. 


MOV + pani $TMP2 


MO\ mo6¢20, ” ttle ;SET UP FOR TRAPS TO 4. 
GGC2: LDFPS 5201 3 TEST INSTRUCTION. 
STFPS RS 3GET THE FPS. 
TST R1 7 WAS y CORRECT AFTER EXECUTION? 
BNE GGC25 [BR IF NOT. 
CMP RO, aoe wena: iI RO CORRECT? 
BNE GGC10 BR IF NOT. 
cmp +2 t ee RS Z1S THE FPS CORRECT? 
BNE 6GC1 :BR IF NOT 
BR CCCDONE 


7 TEST BUFFER AND DATA: 
-1 


GGCTP1: -1,-1,°1,-1 
-1 


REPORT RO INCORRECT. 


GGC10: MOV #GGCTP1-5201 ,$TMP3 
MOV RO, STMP4 

1$: ERROR +244 zRO BAD BuT FSRC FAILED 
BR GGCDONE 

ZREPORT FPS INCORRECT. 

GGC11: MOV #46543, $1P>3 sREPORT FPS INCORRECT. 
MOV RG, $TMP4 

1§: ERROR $245 
BR GGCDONE 

ZREPORT PC INCORRECT = INSTRUCTION. 

GGC25: MOV #GGC2+4,$7MP3 
MOV MGGC2+2, Hae 

1$: ERROR +246 sPC x 


GGCDONE 
; TRAP HERE THROUGH VECTOR FOUR. SEE IF THE TRAP WAS DURING 
SEXECUTION OF THE FPS INSTRUCTION BEING TESTED. IF SO REPORT 


FAILURE. OTHERWISE GO_T0 THE SPURIOUS TRAP TO 4 HANDLING. 


CMP Ree #GG(2+2 
BEG 


GGC20: 





CKEFPCCO FRIIF FLTG PNT PRT C 
TEST # S2 = SOURCE MODES, MODE 6 (FL=0), TEST 


5059 025146 020227 025022 
001402 

5061 025154 000167 022122 

5062 025160 022626 1$: 

5063 025162 010267 154050 

064 025166 


104267 
5065 025170 
025170 104412 


2$: 
GGCDONE : 


F 10 
MACRO M1113 O9=APR=81 73:53 PAGE S1=1 


SEQUENCE 
R2 ,AGGi 24 
1$ 
CPSPUR 
(SP)+,(SP)* 
R2,$TMP2 
+247 ;ODD ADRES 
3GO INITIALIZE THE FPS AND STACK; AND 
SEE IF THE USER HAS EXPRESSED 
7 THE DESIRE TO CHANGE THE SOF TWARE 
;VIRTUAL CONSOLE SWITCH REGISTER (HAS 
3 THE USER TYPED CONTROL G?). 
AMA ;REENABLE MODE 6 70 MODE 7 COMVERSIONS 


122 


CKFPCCO FRIIF FLTG PNT PRT C 


TEST # 53 = SOURCE MODES, MODE 7” 


5067 


025172 000004 


5069 025176 012700 020103 
5070 025202 012760 025276 
5071 025210 012737 004547 
5072 025216 012737 004547 
012737 0252462 


012737 025570 
170170 005201 


620027 920103 
5082 aseges 022704 004547 
84 025270 000454 


50 
5085 

5086 

5087 

5988 025272 177777 

5089 025274 177777 177777 
5090 025304 177777 177777 
5091 | 
5092 

5093 025314 012737 020103 
5094 025322 010037 001242 
5095 025326 104250 

5096 025350 000434 


5099 025332 012737 004547 
5100 025340 010437 001242 
5101 025344 
5102 025346 000425 


025350 012737 025246 
025356 012737 925244 
025364 104252 

000415 


025370 011602 
025372 020227 025244 
025376 001405 


PPA ASIAI IASI 
at ee ee a ot os 3) os J) 
SW =O DODO NANEW 

Lo) 

— 

wn 

oO 


10 
MACRO 41173 O9-APR=<81 13:53 PAGE g, 
(FL=0), TEST 


005201 


177777 
177777 


001240 


001240 


001240 
001242 


SEQUENCE 


~SBTTL TEST # 53 = SOURCE MODES, MODE 7 (FL=0), TEST 


tt R-ae eee RRR RR RRR RRR RRR RRR RR RRR RRR RRR R RRR RRR RR RRR RRR REAR ARSE SE S| 


;eTEST 53 SOURCE MODES, MODE 7 (FL=0), TEST 


* THIS IS A TEST OF SOURCE MODE 7 
* USING THE LDFPS INSTR 


* 
"MRR RERHRRERREHRARHHRATEEREEHEHEEHEREHERRHRAARREERAREKKREKRHRKRERRKREKRKERESE 


1$753: SCOPE 
HHO I: 
LPERR 7SET UP THE LOOP ON ERROR ADDRESS. 
MOV MHHCTP2=5201,R0 :SET UP THE TEST DATA BUFFER 
MOV MHHCTP1,5201(RO) 
MOV #6547,HHC TP) 
MOV #4547. $TMP3 :SAVE DATA IN CASE OF ERROR. 
MOV MHHO OC, STMP2 
CLR R1 
MOV mH 20, ERRVECT :SET UP FOR TRAPS TO 4. 
HHC2:  LDFPS a5207 ( :TEST INSTRUCTION. 
STFPS SGET THE. FPS. 
TST al “WAS PC CORRECT AFTER EXECUTION? 
BNE HH 25 *BR IF NOT. 
CMP RO, #HHCTP2=5201 :1S a0 CORRECT? 
BNE HHC 10 [BR IF NOT. 
CMP #6547,R4 1S ie FPS CORRECT? 
BNE HHC11 ‘BR IF NOT. 
BR HHC DONE 


7 TEST _ AND DATA: 


HHCTP1: .WORD =-1,-1,-1,-1 

HHCTP2: .WORD -1,-1,-1,21 

;REPORT m0 INCORRECT. 

HHC10: og tx 5201, $TMP3 
mov RO, $TM 

1$: ERROR +250 :RO BAD BUT FSRC FAILED 
BR HHCDONE 

;REPORT FPS INCORRECT. 

HHC11: MOV #4547, $1MP3 sREPORT FPS INCORRECT. 
MOV R4,STMPSG 

1$: ERROR +251 
BR HHCDONE 

sREPORT PC INCORRECT AFTER INSTRUCTION. 

HHC25: MOV #HHC2+4 , STMPS 
MOV MHHC 2 +2, $TMPS 

1$: ERROR +252 sPC x 


BR HHC DONE 
; TRAP HERE THROUGH VECTOR FOUR, SEE IF THE TRAP WAS DURING 
sEXECUTION OF THE FPS INSTRUCTION BEING TESTED. IF SO REPORT 
FAILURE. OTHERWISE GO TO THE SPURIOUS TRAP TO 4 HANDLING. 


HHC20: MOV (SP) ,R2 
CMP R2,MHH(2+2 
BEG 1$ 


123 


po 


CKFPCCQO FPIIF FLTG PNT PRT C 


TEST # 53 = SOURCE MODES, MODE 7 (FL=0), TEST 


020227 025246 CMP 
00140 BEO 
000137 047302 JMP 
022626 1$: CMP 
010237 001236 MOV 
104253 23: ERROR 
HHC DONE : 
104412 RSETUP 
ENABL 


H 10 
MACRO M1113 Q9=APR=81 13:53 PAGE 52-1 


R2,AHH(2+4 
1$ 


CPSPUR 
(SP)¢,(SP)+ 
R2,$TMP2 
+253 


AMA 


SEQUENCE 


;DDD ADDRESS 


3GO INITIALIZE THE FPS AND STACK; AND 
SEE IF THE USER HAS EXPRESSED 

THE DESIRE TO CHANGE THE SOF TWARE 
SVIRTUAL CONSOLE SWITCH REGISTER (HAS 
THE USER TYPED CONTROL G?). 


124 


1_10 
CKFPCCO FRTIF FLTG PNT PRT C MACRO M1173 O9-APR=81 13:53 PAGE 53 SEQUENCE 
TEST @ 54 = SOURCE MODES, MODE 2 GR? (Fi=1), TEST 


513) ~SBTTL TEST # 54 = SOURCE MODES, MODE 2 GR? (FL=1), TEST 
+ RRR RAAARAR ERAT ER EERE AEREREEARAERHEROHERERERRRA EERE REAP EERE REE 


T*TEST 54 SOURCE MODES, MODE 2 GR7 (FL=1), TEST 


t® THIS IS & TEST OF THE LDCLD WITH 
te IMMEDIATE ADDRESSING MODE 


s PRAHA AAAAAARARRARAHAEHEEHAEAAAARAHARAAARAAARERAAARAARAAANRRRAREA ARES 


_— 025424 000004 1S754: SCOPE 
5133 025426 11C1: 
025426 104413 LPERR SET UP THE LOOP ON ERROR ADDRESS. 

5134 025430 012737 025454 001236 MOV #11C2,$TMP2 “SAVE DATA IN CASE OF ERROR. 

5135 025436 012737 025526 000004 MOV @IITCOO,ERRVECT ;SET UP FOR TRAPS TO 4. 

5136 025444 012700 000300 MOV #300,R0 

$137 025450 170100 LDFPS) = RO. 

2138 025452 005001 CLR R1 

5140 025454 177027 11C2: LDCLD (R7)+, ACO TEST INSTRUCTION. 

5141 025456 005201 §201 

5142 025460 005201 5201 

$143 025462 005201 5201 

Dee 025464 005201 §201 

5146 025466 020127 000003 CMP R13 WAS PC CORRECT AFTER EXECUTION? 

led 025472 001421 BEG 1 I CDONE 7BR IF VES. 

5149 

5150 REPORT PC INCORRECT AFTER INSTRUCTION. 

5151 025474 012704 025460 11¢3: MOV MITC2*6,R4 

5152 025500 162701 000003 SUR #3,R1 

5153 025504 006301 ASL R1 

5154 025506 160104 SUB R1,RS 

5155 025510 010437 001242 MOV R4,$TMPS 

5156 025514 012737 025460 001240 MOV #110 2+4,$TMP3 

5157 025522 104254 1$: ERROR +254 BAD CONSTANT 

5758 025524 000404 ao 1 1 CDONE 

5159 TRAP HERE THROUGH VECTOR FOUR. SEE IF THE TRAP WAS DURING 

5160 EXECUTION OF THE FPS INSTRUCTION BEING TESTED. IF SO REPORT 

5161 FAILURE. OTHERWISE GO TO THE SPURIOUS TRAP TO 4 HANDLING. 

5162 025526 011637 001236 1120: MOV (SP) ,$TMP2 

5163 025532 022626 CMP (SP)+,(SP)+ 

gies 025534 104255 1$: ERROR +255 BAD CONSTANT ODD ADD 

5166 025536 LICDONE : 

025536 104412 RSE TUP :GO INITIALIZE THE FPS AND STACK: AND 

SEE IF THE USER HAS EXPRESSED 
THE DESIRE TO CHANGE THE SOF TWARE 
sVIRTUAL CONSOLE SWITCH REGISTER (HAS 
THE USER TYPED CONTROL G?). 

5167 

5174 
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—CKFPCCO FPTIF FLTG PNT PRT C 


J 10 
MACRO M1113 O9=APR=81 13:53 PAGE 54 


SEQUENCE 


TEST # 55 = SOURCE MODES, MODE 2 (FL=1), TEST 
5175 “SBITL TEST # 55 = SOURCE MODES, MODE 2 (FL=1), TEST 
SL ARAAAAAAAAAARAARAAAEARERAEERAAAAERRARORARKAAARRARAAAERRRARERE NES 
TeTEST 55 SOURCE MODES, MODE 2 (FL=1), TEST 
t® THIS IS A TEST OF THE LDCLD INSTR 
te WITH MODE 2. 
Reet eee RRR E ERE EEE E ERENT EERE REE E EERE EERE RRR ERE EERE REED 
| 025540 000004 1$155: SCOPE 
| §177 025542 TCC): 
| 025542 104413 LPERR SET UP THE LOOP ON ERROR ADDRESS. 
| -§178 025544 012737 025566 001236 MOV TCC2,$TMP2 SAVE DATA IN CASE OF ERROR. 
| §179 025552 012700 000300 MOV #300.R0 
| 5180 025556 170100 LDFPS oR 
| $181 025560 912700 025654 MOv #TCCBFO,RO :SET UP THE TEST DATA BUFFER. 
| 5182 025564 177020 TCC2: LDCLD (RO)+,ACO STEST INSTRUCTION. 
5184 025566 170204 STFPS RG :GET THE FPS. 
5185 025570 012701 025664 MOV #TCCBF1,R1 SGET THE RESULT. 
5186 025574 012702 000200 V #200,R2 
5187 025600 170102 LDFPS = R2 
5188 025602 174011 TD ACO, (R1) 
5189 025604 020027 025660 CMP RO,MTCCBFO+4  ;1S RO CORRECT? 
| 5190 025610 001407 BEQ TCC3 
| $191 :REPORT RO INCORRECT. 
5192 025612 010037 001242 MOV RO, $TMP4 
| 5193 025616 012737 025660 001240 MOV ATCC 3FO+4, STMP3 
5194 025624 104256 1$: ERROR +256 ;BAD CONST 
5195 025626 000422 BR TCCDONE 
5197 025630 022704 000300 TCC3: CMP #300.R4 :1S THE FPS CORRECT? 
5198 025634 001417 BEQ TCCDONE 
5200 :REPORT FPS INCORRECT. 
5201 025636 010437 001242 MOV RL. $TMPS 
5202 025642 012737 000300 001240 MOV #300, $TMP3 
5203 025650 104257 1$ ERROR +257 FPS x 
5204 025652 000410 BR TCCDONE 
5205 
5206 
$207 :TEST BUFFER AND DATA 
5208 025654 001234 067076 054321 TCCRFO: .WORD 01254, * 67076 ,54321,012345 
5209 025664 177777. 177777. 177777. «~*TCCBFI1: <-1.-1,<1.21 
5211 025674 TCCDONE : 
025674 104412 RSE TUP 





3GO INITIALIZE THE FPS AND STACK; AND 
;SEE IF THE USER HAS EXPRESSED 

THE DESIRE TO CHANGE ‘THE SOF TWARE 
SVIRTUAL CONSOLE SWITCH REGISTER (HAS 


TTHE USER TYPED CONTROL G?). 
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/CKFPCCO FRIIF FLTG PNT PRT C 


TEST # 56 = LDCIF AND LDCLF TEST 


$221 


025676 


$226 025700 
025700 
5227 025702 


5238 025736 


5241 025736 
025736 
5242 025740 


5244 025744 


5252 025772 


000004 


104413 
004737 


000000 
000000 
004177 
000000 
000004 
177777 
104262 
000401 
104261 


104413 
004737 


027032 
000000 
000000 
177777 


027032 
177777 
000000 
177400 


000000 
177777 


K 10 
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~SBTTL 


SEQUENCE 


TEST # 56 = LDCIF AND LDCLF TEST 


RRR RAERAEREREE RE RERAAEEEEARAEARAEEEERRRERETEER RHEE RARER HE 


TEST 56 
-*® THIS IS A TEST OF THE LDCIF AND 


LDCIF AND LDCLF TEST 


3* THE LDCLF INSTRUCTIONS. 


re 
. 


TOR PRAERESESSEERSSSE SEER ER ERR EEE RSE REAR RRR RRR RRR RRR RRR RRA RAR RRR R SSD 


15156: 


SCOPE 

OPERAND FL=0 

LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
JSR PC,LDCF SUB *GO EXECUTE INSTRUCTION. 

.wORD 0,0 :FSRC OPERAND. 

“WORD r ;EXPECTED RESULT. 

“WwORD 1,217 SANTICIPATED ERRONEOUS RESULT. 
0 [FPS BEFORE EXECUTION. 

4 ‘FPS AFTER EXECUTION. 

o] SANTICIPATED ERRONEOUS FPS. 
ERROR 3260 “REPORT RESULT INCORRECT. 
ERROR +261 sREPORT FPS INCORRECT. 

OPERAND FL=0 

LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
JSR PC,LDCF SUB ‘GO EXECUTE THE INSTRUCTION. 
.WwORD 0,-1 :FSRC OPERAND. 

“WORD 0,0 TEXPECTED RESUL 

4177,177600 “ANTICIPATED PRONE OUS RESULT. 
0 [FPS BEFORE EXECUTION. 

4 “FPS AFTER EXECUTION. 

an ‘ANTICIPATED ERRONEOUS FPS. 
ERROR +262 ‘(BUT FL) ST 

BR 6 +277 TO 300 

ERROR +261 SINTO 301 

OPERAND FL=1 

LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
JSR PC,LDCF SUB *GO EXECUTE THE INSTRUCTION. 
~WORD 0,0 *FSRC OPERAND. 

“wORD 0,0 SEXPECTED RESULT. 

"WORD =1,=1 ‘ANTICIPATED ERRONEOUS RESULT. 
100 ‘FPS BEFORE EXECUTION. 

106 ‘FPS AFTER EXECUTION, 

4 ‘ANTICIPATED ERRONEOUS FPS. 
ERROR +260 “REPORT RESULT INCORRECT. 
ERROR +263 sFL WAS CLR'ED 
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TEST # 56 = LDCIF AND LDCLF TEST 


SEQUENCE 128 





| 
| 5267 026032 6$: 
«5268 : OPERAND POSITIVE FL=0 
5269 026032 KKC4: 
| 026032 104413 LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
| 5270 026034 004737 027032 JSR PC, LDCF SUB :GO EXECUTE | THE INSTRUCTION. 
| §271 026040 040000 000000 1$: “WORD  40000,0 *FSRC OPERAN 
| 5272 026044 043600 000000 2$: “WORD 23600. 0 S EXPECTED RESULT. 
5273 026050 047600 000000 33: "WORD  47600.0 SANTICIPATED ERRONEOUS RESULT. 
| §274 026054 17 A$: 17 “FPS BEFORE EXECUTION. 
| 5275 026056 000 0 ‘FPS AFTER EXECUTION. 
5276 026060 177777 -1 ‘ANTICIPATED ERRONEOUS FPS. 
5277 026062 104264 S$: ERROR +264  ;:ST 107 BAD 
5278 026064 000401 BR 6$ =CONSTANT 231 INSD 
5279 026066 104261 ERROR +261 £215 
5280 026070 68: 
5281 sOPERAND=1, FL=0 
5282 026070 KKC5: 
026070 104413 LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
5283 026072 004737 027032 JSR PC,LDCF SUB °GO EXECUTE THE INSTRUCTION. 
026076 000001 000000 1$ “WORD 1, [FSRC OPERAND. 
5285 026102 040200 000000 2$ “wORD  40200.0 TEXPECTED RESULT 
026106 044200 000000 3$ "WORD 44200.0 ‘ANTICIPATED ERRONEOUS RESULT. 
5287 026112 000017 4 17 ‘FPS BEFORE EXECUTION 
5288 026114 000000 0 ‘FPS AFTER EXECUTION. | 
5289 026116 177777 -1 “ANTICIPATED ERRONEOUS FPS. 
2 026120 104264 5$ ERROR +264 sREPORT RESULT INCORRECT. 
5291 026122 000401 BR 6$ 
5292 026124 104261 ERROR +261 ;REPORT FPS INCORRECT. 
$293 026126 68: 
294 
5295 
5296 OPERAND= PATTERN FL=0 
5297 026126 6: 
026126 104413 LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
5298 026130 004737 027032 JSR PC,LDCF SUB °GO EXECUTE THE INSTRUCTION. 
5299 026134 000252 000000 1$: “WORD 252,0 “FSRC OPERAND. , 
5300 026140 042052 000000 2$: "WORD 2052.0 TEXPECTED RESUL 
5301 026144 046052 000000 3$: "WORD  46052.0 S ANTICIPATED PRRONEOUS RESULT. 
5302 026150 4$: 0 ‘FPS BEFORE EXECUTION. 
5303 026152 0 sFPS AFTER EXECUTION. 
5304 026154 177777 -1 ‘ANTICIPATED ERRONEOUS FPS. 
5305 026156 104264 5$ ERROR +264 sREPORT RESULT INCORRECT. 
5306 026760 000401 BR 6$ . 
5307 026162 104261 ERROR +261 :REPORT FPS INCORRECT. 
5308 026164 63: 
5309 
5310 OPERAND=-40000 FL=0 
5311 026164 
026164 104413 LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
5312 026166 004737 027032 JSR PC LDCF SUB “GO EXECUTE THE INSTRUCTION. 
5313 026172 140000 000000 1$: “WORD 4000 sFSRC OPERAND. 
5314 026176 143600 000000 2$: * WORD 143600" 5 ‘EXPECTED RESULT. 
5315 026202 043600 000000 3$: "WORD  43600,0 :ANTICIPATED ERRONEOUS RESULT. 
5316 0262 00007 i$: ? [FPS BEFORE EXECUT ION. 
5317 026210 000010 10 *FPS AFTER EXECUTION 
$318 026212 177777 of S ANTICIPATED ERRONEOUS FPS, 
5319 026214 104265 S$: ERROR +265 *(SET SIGN) ST 146 


cr ——— + — — -- - -—_ -- - -- ee 


/CKFPCCO FPIIF FLTG PNT PRT C 


TEST # 56 = LDCIF AND LDCLF TEST 


| §320 026216 000401 
5331 026220 104261 

| 5322 O26ee22 

| §353 

| § 354 

| §335 026222 

| 026222 

5326 026224 


5327 026230 
5328 026234 
5329 026240 


104413 
027032 


000400 


104261 
5336 026260 
5 
5339 026260 
0 104413 
027032 
125252 000000 


126000 
126000 


5350 026316 


5353 026316 +3 
37 027032 
0000 000000 
00 000000 
. 000000 


027032 
000001 
000000 
000000 


5372 026376 


M 10 
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ital 6$ 

ERROR +261 
6$: 
; OPERAND=<1 FL-0 
KKCB: 
; LPERR 

JSR PC,LDCFSUB 
1$: WORD -1,0 
2$: “wORD  140200,0 
3$: ~ WORD 144000,400 
4$: 0 

" 
5$ ERROR +266 

BR 6$ 

ERROR +261 
6$: 
; OPERAND=PAT TERN FL=0 
KKC9: 

LPERR 

JSR PC,LDCF SUB 
1$: “WORD 125252,0 
?$: WORD 143652,126900 
3$: »WORD 43652,126000 
4$: 7 

f 
S$ ERROR +265 

BR 6$ 

ERROR +261 
6$: 
; OPERAND POS FL=-1 
KKC10: 

LPERR 

JSR PC,LDCF SUB 
1$ -WORD  40000,0 
2$ -WORD 47600,0 
3$ ~-WORD 43600,0 
4$ 117 

190 
S$ ERROR +267 

BR 6$ 

ERROR +261 
6$: 
; OPERAND=1 FL=1 
KKC11: 

LPERR 

JSR PC,LDCF SUB 
1$: ~ WORD 1 
2$: “WORD 40200,0 
3$: WORD 34200,0 
4$: 100 





:ST 107 


SEQUENCE 129 


REPORT FPS INCORRECT. 


;SET UP? THE LOOP ON ERROR ADDRESS. 


3GO EXECUTE THE INSTRUCTION. 
:FSRC OPERAND. 
EXPECTED RESUL 
ANTICIPATED ERRONEOUS RESULT. 


FPS BEFORE EXECUTION. 

FPS AFTER EXECUTION. 
ANTICIPATED ERRONEOUS FPS. 
3ST_372 TO 152 INTO 

3112 (BUF XNBT) 

ZREPORT FPS 


"NCORRECT. 


;SET UP THE LOOP ON ERROR ADDRESS. 
3GO EXECUTE THE INSTRUCTION. 


7FSRC OPERAND. 
EXPECTED RESULT. 
ANTICIPATED ERRONEOUS RESULT. 


:FPS BEFORE EXECUTION 

FPS AFTER EXECUTION. 
ANTICIPATED ERRONEOUS FPS. 
REPORT RESULT INCORRECT. 


REPORT FPS INCORRECT. 


;SET UP THE LOOP ON ERROR ADDRESS. 


3GO EXECUTE THE INSTRUCTION. 
[FSRC OPERAND. 

TEXPECTED RESUL 

ANTICIPATED ERRONEOUS RESULT. 
FPS BEFORE EXECUTION. 


SFPS AFTER EXECUTION. 
;ANTICIPATED ERRONEOUS FPS. 


ONS TANT 
;BAD 237 INST 217 
REPORT FPS INCORRECT. 


;SET UP THE LOOP ON ERROR ADDRESS. 
3GO EXECUTE THE INSTRUCTION, 


3FSRC OPERAND. 
EXPECTED RE SUL 

ANTICIPATED ERRONEOUS RESULT. 
EPS BEFORE EXECUTION, 


5373 026400 


2er8 026406 
5377 026410 
026412 


y 


5 026534 
5417 026536 
5418 026540 
5419 026542 
5420 026544 
5421 


5422 

5423 026544 
026544 

5424 026546 

5425 026552 


104261 


104413 


104413 
004737 
125252 


TS. FPTIF FLTG PNT PRT C 


T # 56 = LDCIF AND LDCLF TEST 


027032 


027032 
000000 
000000 
000000 


027032 
177777 
000000 
000000 
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190 
5$: ERROR +267 
R 6$ 
ERROR +261 
6$: 
; OPERAND= PATTERN FL=1 
KKCl2: 
LPER 
JSR PC,LDCF SUB 
1$: .~ WORD 0,252 
2$: “WORD 42052,0 
3$: “WORD  36052.0 
4$: 111 
100 
5$: ERROR +267 
6$ 
ERROR +261 
6$: : 
; OPERAND=-40000,0 FL=1 
KKC13: 
LPERR 
JSR °C ,LDCF SUB 
1$: “WORD -40000,0 
2$: "wORD 147600.0 
3$: “WORD 47600,0 
4$: 107 
110 
5$: ERROR 3265 :SET 
ERROR oF61 
6$: 
sOPERAND=-1,-1  FL=1 
KKC14: 
LPER 
JSR PC,LDCF SUB 
1$: ~WOR -1,-1 
2$: “WORD  140200,0 
3$: “wORD 150000.0 
4$: 100 
110 
S$: ERROR +266 
R 6$ 
ERROR +261 
6$: 
s OPERAND=-PAT TERN FL=1, 
KKC15: 
LPERR 
JSR PC .LDCF SUB 
1$: “WORD 125252,125252 


1 


0 


SEQUENCE 130 


FPS AFTER EXECUTION. 
ANTICIPATED ERRONEOUS FPS. 
REPORT RESULT INCORRECT. 


sREPORT FPS INCORRECT. 


:SET UP THE LOOP ON ERROR ADDRESS. 


2 EXECUTE THE INSTRUCTION. 
FSRC OPERAND. 

SEXPECTED RESULT 

TANTICIPATED ERRONEOUS RESULT. 
FPS BEFORE EXECUTION. 


SFPS AFTER EXECUTION. 
sANTICIPATED ERRONEOUS FPS. 
REPORT RESULT INCORRECT. 


sREPORT FPS INCORRECT. 


:SET UP THE LOOP ON ERROR ADDRESS. 
3GO EXECUTE THE INSTRUCTION. 
:FSRC OPE 


RAND . 
SEXPECTED RESULT. 


ZANTICIPATED ERRONEOUS RESULT. 
FPS BEFORE EXECUTION. 

sFPS AFTER EXECUTION. 
ANTICIPATED ERRONEOUS FPS. 


SIGN 


sREPORT FPS INCORRECT. 


;SET UP THE LOOP ON ERROR ADDRESS. 
:GO EXECUTE THE INSTRUCTION. 
:FSRC OPE 


RAND. 
.sEXPECTED RESULT. 
sANTICIPATED ERRONEOUS RESULT. 
FPS BEFORE ty he ph lags 
FPS AFTER EXECUTION. 
ANTICIPATED ERRONEOUS FPS. 
; (BUT XNBT) 


REPORT FPS INCORRECT. 


ROUND MODE 


;SET UP THE LOOP ON es ADDRESS. 
[GO EXECUTE THE INSTRUCTION. 
3FSRC OPERAND. 


-CKEPCCO FPI7F FLTG PNT PRT C 





TEST # 56 = LDCIF AND LDCLF TEST 


5426 026556 147652 125253 
5427 026562 od £4 125253 


5429 026570 000110 
5430 026572 
5431 026574 104265 
5432 026576 


26600 
5434 026602 
5438 026604 004737 027032 
177500 


5440 026614 047777 177777 
5441 026620 047777 177776 


5447 026636 104261 
026640 104413 
5452 U26642 004737 027032 


5455 026656 047600 000000 
000102 


5461 026674 104261 
026676 104413 

5466 026700 004737 027032 
0000 


5469 026714 047600 000001 
000157 


5475 026732 104261 


5477 
5478 026734 
026734 104413 
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SEQUENCE 131 

2$: ~WORD 147652,125253 sEXPECTED RESULT. 
7$: . WORD 47652,125253 sANTICIPATED ERRONEOUS RESULT. 
4$: 105 FPS BEF ORE EXECUTION. 

110 sFPS AFTER EXECUTION. 

-1 “ANTICIPATED ERRONEOUS FPS. 
5$: pest, ge s REPORT RESULT INCORRECT. 
és ERROR +261 ;REPORT FPS INCORRECT. 
emma ldel  e: FL=1, ROUND MODE 
KK 3 

LPERR :SET UP THE LOOP ON ERROR ADDRESS. 

JSR PC, LDCF SUB 7GO EXECUTE THE INSTRUCTION. 
1$ ~ WORD 77777,177500 3FSRC OPERAND. 
2s ~ WORD 4/777,177777 S EXPECTED RESULT. 
$$ . WORD 47777,177776 S ANTICIPATED ERRONEOUS RESULT. 
4$ 117 FPS BEF ORE ey hp a hg 

100 FPS AFTER EXECUTION. 

-1 SANTICIPATED ERRONEOUS FPS. 
5$: _ a ;ST 631 INTO RND 
é$ ERROR +261 ;REPORT FPS INCORRECT. 
1A sepals FL=1, ROUND MODE 
KK $ 

LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 


JSR PC,LDCF SUB 3GO EXECUT. THE INSTRUCTION. 


1$ WORD 40000, 100 sFSRC OPERAND. 
2$ WORD 47600,1 ;EXPECTED RESULT. 
3$ . WORD 47600,0 : ANTICIPATED ERRONEOUS RESULT. 
4$ 102 3FPS BEFORE EXECUTION. 
100 sFPS AFTER EXECUTION. 
-1 ;ANTICIPATED ERRONEOUS FPS. 
5$: pee i ;REPORT RESULT INCORRECT. 
6$ ERROR +261 ;REPORT FPS INCORRECT. 
ST Papiinaaaiactaamalie FL=1, TRUNC MODE 
KK 
LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
JSR PC,LDCF SUB 3;GO EXECUTE THE INSTRUCTION. 
$ . WORD 40060, 100 sFSRC OPERAND. 
2$ -WORD 47600,0 EXPECTED RESULT. 
3$ WORD 15600. 1 sANTICIPATED ERRONEOUS RESULT. 
4$ 157 sFPS BEFORE EXECUTION. 
140 sFPS AFTER EXECUTION. 
-1 T ANTICIPATED ERRONEOUS FPS. 
5$: —— — 7ST 631 ... INTO TRNC 


B 
oe ERROR +261 :REPORT FPS INCORRECT. 
 OPERAND=100000,,0 (MOST NEG #) FL=0 

"  LPERR :SET UP THE LOOP ON ERROR ADDRESS. 


—CKFPCCO FPITIF FLTG PNT PRT C 


5479 026736 
5480 026742 


5489 026772 
90 


5492 026772 


5496 027010 
5497 027014 
5498 027016 
5499 027020 
5500 027022 


TEST # 56 = LDCIF AND LDCLF TEST 


027032 
000000 
000000 
000000 


027032 
000000 


000000 
000000 
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JSR PC,LDCF SUB 3;G0 EXECUTE a * 0 Lec 
1$: WORD 100000,0 sFSRC OPERAND. 
2$: «WORD 144000,0 ENPECTED RESULT. 
3$ WORD 143600,0 *ANTICIFATED ERRONEOUS RESULT. 
4$: 7 :FPS BEFORE EXECUTION. 
10 sFPS AFTER EXECUTION. 
-1 sANTICZIPATED ERRONEOUS FPS. 
S$: — ae 7ST 630 RH*R14+1 
6$ ERROR +261 ;REPORT FPS INCORRECT. 
; OPERAND=100000,0 FL=1 
KKC20: 
LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
JSR PC,LDCF SUB :GO EXECUTE THE INSTRUCTION. 
1$ .~ WORD 100000.0 zFSRC OPERAND. 
2$ .~ WORD 150000,0 S EXPECTED RESUL 
58: .~ WORD 147600,0 * ANTICIPATED YERONEOUS RESULT. 
4S: 107 sFPS BEF ORE EXECUTION. 
110 sFPS AFTER EXECUTION, 
-1 sANTICIPATED ERRONEOUS FPS. 
5$: " 4 sREPORT RESULT INCORRECT. 
ERROR +261 sREPORT FPS INCORRECT. 
6$: BR KKCDONE 


THIS SUBROUTINE, LDCFSUB, IS USED TO SET UP _THE OPERANDS, EXECUTE 
THE LDCIF OR LDCLF INSTRUCTION AND CHECK THE RESULTS. A CALL 
3TO IT IS MADE THUS: 


: JSR PC,LDCF SUB 
: ACARG: .WORD X,X 3;AC OPERAND 
3 RES: «WORD X,X EXPECTED RESULT 
ERRES: .WORD X,X ;ERROR RESULT 
FPSB: «WORD X :FPS BEFORE EXECUTION 
FPSA: «WORD X FPS AFTER EXECUTION 
ERFPS: .WORD X ERROR FPS 
ERR1: ERROR +X ;DATA ERROR 
BR CONT 
ERR2: ERROR +X FPS ERROR 
CONT: RETURN ADDRESS 


"THE OPERANDS ARE SET UP (USING ACO AS THE ACCUMULATOR). THEN 
7; THE LDCIF OR LDCLF INSTRUCTION IS EXECUTED. 

; THE RESULT IS CHECKED AGAINST RES. IF THE RESULT IS CORRECT THEN THE FPS IS 
[COMPARED WITH FPSA IF THIS TOO IS CORRECT LDCFSUB RETURNS CONTROL 

3TO THE CALLING ROUTINE AT CONT. IF THE FPS IS GAD LDCFSUB WILL 

[COMPARE IT TO ERROR FPS. IF THIS MATCHES THEN LDCFSUB WILL RETURN 

:TO THE ERROR CALL AT ERR2, OTHERWISE LDCFSUB ITSELF 

[REPORTS THIS FAILURE AND THEN RETURNS TO CONT. IF THE RESULT OF THE 

;LDCIF OR LDCLF IS INCORRECT, THE INCORRECT RESULT IS COMPARED WITH THE 
ANTICIPATED FAILING DATA PATTERN, ERRES. IF THE FAILURE IN 

>THE RESULT WAS ANTICIPATED CORRECTLY TO BE ERRES THEN LDCFSUB 

zsWILL TRANSFER CONTROL TO THE ERROR CALL AT ERR1. OTHERWISE THE 

SRESULT WAS INCORRECT BUT WAS NOT ANTICIPATED AND LDCF SUB 

REPORT THE FAILURE AFTER WHICH CONTROL WILL BE PASSED TO CONT. 


CKFPCCO FRPTIF FLTG PNT PRT C 


TEST # 56 = LDCIF AND LDCLF TEST 


5535 
5536 027032 
5537 ass 


5538 02704 

5539 027042 

5540 027050 
5541 

| = $542 027052 
5543 

5544 027054 

5545 027056 





5563 027150 
2541 027152 


566 027156 
5567 027160 


5577 027210 


5580 027214 


5582 027214 
at 027216 


5587 027220 
5588 027224 
244 027226 


177010 
170204 


174010 
012702 


077303 
026104 


001020 
000161 


012702 


000161 


104260 
000760 


026104 
001002 
000161 


000014 
027052 


027236 
000200 


027236 
001242 
001240 


000004 


0 
000016 


000004 
000002 


000016 
000030 


027236 


000010 
000002 


000022 


000020 
000026 
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001236 


001252 


LDCF SUB: MOV (SP)+,R1 :GET A POINTER TO THE ARGUMENTS. 
MOV 14(R1),R0 sSET THE FPS. 
LDFPS RO 
MOV 13,$TMP2 
MOV R1,RO0 
1$: LDCIF (RO) ,ACO ;TEST INSTRUCTION LDCIF OR LDCLF. 
STFPS R4 sGET FPS. 
MOV #LDCT,RO :GET THE RESULT. 
MOV #200,R2 
LDFPS R 
STD ACO, (RO) 
MOV #LDCT,R2 sSEE IF THE RESULT WAS CORRECT. 
MOV R2,$TMP4 
MOV R1,$7MPZ 
MOV Ri,R 
ADD #4 ,R3 
MOV R3,$TMP5 
MOV R4,$TMP7 
MOV 16(R1),$TMP10 
MOV R1,RO 
ADD #4,RO 
MOV #2,R3 
2$: CMP (RO)+,(R2)+ 
BNE 10$ 3;BR IF INCORRECT. 
SOB R3,2$ 
CMP 16(R1) ,RS sSEE IF THE FPS WAS CORRECT. 
BNE 15$ :BR IF INCORRECT. 
3$: JMP 30(R1) ZRETURN. 
;RESULT IN CORRECT SO SEE IF THE FAILURE WAS ANTICIPATED. 
10$: MOV #LDCT,R2 
MOV R1,RO 
ADD #10,R0 
MOV #2,R3 
11$: CMP (RO) +, (R2)+ 
BNE 13$ 
SOB R3,11$% 
JMP 22(R1) 


te FAILURE WAS NOT ANTICIPATED SO REPORT THE ERROR HERE. 


14$: ERROR +260 BAD RES 
BR 3$ 


THE FPS WAS INCORRECT SO SEE IF IT WAS ANTICIPATED. 
15$: CMP 20(R1) ,R4 


BNE 16$ 
JMP 26(R1) 


3;FPS ERROR NOT ANTICIPATED SO REPORT IT HERE. 


’ 


—-m 


CKFPCCO FRIIF FLTG PNT PRT C 
TEST # 56 = LDCIF 


| 
| 
| 
| 
Sf 


5592 027232 

5593 027232 

5594 027234 

5596 

5597 027236 

5598 

5599 027246 
027246 


AND LDCLF TEST 


16$: 
104261 17$: ERROR +261 
000751 AK 3$ 


DATA BUFFER: 
000000 000000 000000 {DcT: . WORD 


KKCDONE : 
RSE TUP 


C.0.0,0 


104412 
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SEQUENCE 


BAD FFS 


3GO INITIALIZE THE FPS AND STACK; AND 
;SEE IF THE USER HAS EXPRESSED 


3 THE DESIRE TO CHANGE THE SOF TWARE 
;VIRTUAL CONSOLE SWITCH REGISTER (HAS 
3 THE USER TYPED CONTROL G?). 


134 
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TEST # 57 = LDCID AND LDCLD TEST 


5606 ~SBTTL TEST # 57 = LDCID AND LDCLD TEST 
TROP RRR RSERE SERRE RE REE RRR RR RRR RRA RR RARER RRR RRR RRR RRR ARREARS RRA SS OS 


:*TEST 57 LDCID AND LDCLD EST 
:* THIS IS A TEST OF LDCID AND LDCLD 
te 


+ RERAEREREREREEEEE SEERA REEREAREHEREREEH KRHREHEHEEEHREKERAREREHT EEE 


027250 000004 1S$157: SCOPE 
5607 : OPERAND=0 FL=0, FD=1 
5608 027252 LLCVs 
027252 104413 LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
5609 027254 006737 030050 JSR PC, LDCDSUB =GO EXECUTE THE INSTRUCTION. 
5610 027260 000000 000000 1$: .WORD 0,0 :FSRC OPERAND. 
5611 027264 000000 006000 900000 2$: “WORD 0,0,0,0 SEXPECTED RESUL 
5612 027274 «177777. «4177777~=«177777~—88: "WORD 1,°1,°1,-1 ANT ICIPATED ERRONEOUS RESULT. 
$613 027304 000213 4$: 313 :FPS BEFORE EXECUTION. 
5614 027306 000204 204 SFPS AFTER EXECUTION. 
5615 027310 177777 «1 [ANTICIPATED ERRONEOUS FPS. 
5616 027312 104273 S$: ERROR +273 “REPORT RESULT INCORRECT. 
5617 027314 000401 BR 6$ 
5618 027316 104274 ERROR +274 :REPORT FPS INCORRECT. 
5619 027320 
5620 : OPERAND=0 Fi=0, FD=1 
5621 027320 LLCe: 
027320 104413 LPERR :5ET UP THE LOOP ON ERROR ADDRESS. 
5622 027322 004737 030050 JSR PC, LDCDSUB ‘GO EXECUTE THE INSTRUCTION. 
5623 027326 000000 177777 1$: “WORD 0,-1 ‘FSRC OPERAND. 
5624 027332 000000 000000 000000 2$: “WORD 0,0,0,0 “EXPECTED RESULT. 
5625 027342 004177 177400 000000 38: "WORD 4177.177400,0.0 :ANTICIPATED ERRONEOUS RESULT. 
5626 027352 000200 i$: 200 :FPS BEFORE EXECUTION. 
5627 027354 000204 204 “FPS AFTER EXECUTION. 
5628 027356 177777 at ‘ANTICIPATED ERRONEGUS FPS. 
5629 027360 104275 S$: ERROR +275 * (BUT FL)S+#277 
5630 027362 000401 ; BR 6$ :TO0 300 INTO 301 
5631 027364 104274 ERROR +274 “REPORT FPS INCORRECT. 
5632 027366 6$: 
5633 
5634 : OPERAND=0 FL=1 FD=1 
5635 027366 LLC3: 
027366 104413 LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
5636 027370 004737 030050 JSR PC ,LDCDSUB °GO EXECUTE THE INSTRUCTION. 
5637 027374 000000 000000 1$: ~wORD 0,0 [FSRC OPERAND. 
5638 027400 000000 000000 000000 2%: “WORD 0,0,0,0 TEXPECTED RESUL 
5639 027410 177777 177777 177777. 3S: i a, ot pe ANT a PATED ERRONEOUS RESULT. 
5640 027420 000211 4$: 311 :FPS BEFORE EXECUTION. 
5641 027422 000204 204 “FPS AFTER EXECUTION, 
5642 027424 177777 o1 TANTICIPATED ERRONEOUS FPS. 
5643 027426 104273 S$: ERROR +273 “REPORT RESULT INCORRECT. 
$644 027430 000401 BR $ 
5645 027432 104274 . ERROR +276 :REPORT FPS INCORRECT. 
5646 027434 é$: 
5647 
5648 ; OPERAND= 40000 FL=0  FD=1 
5649 027634 LLC4 
027434 104413 LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
5650 027436 004737 030050 JSR PC LDCDSUB *GO EXECUTE THE INSTRUCTION, 
5651 027442 040000 900000 1$: “WORD 40000 7FSRC OPERAND. 


CKFPCCO FRIIF FLTG PNT PRT C 


TEST # 57 = LDCID AND LDCLD TEST 


5652 027446 043600 000000 
5653 027456 047600 000000 
5654 027466 000217 

5655 027470 000200 - 
5656 027472 177777 

5657 027474 


5660 027502 


5663 027502 


Oo 
ins) 
~N 
vw 
oO 
Nm 
= 
oO 
x 


664 030050 
5665 027510 140000 000000 
5666 027514 143600 000000 
5667 027524 043600 000000 

000200 


5674 027550 


5677 027550 


5678 027552 004737 030050 
5679 027556 040000 000000 
5680 027562 047600 000000 
pont 027572 043600 000000 


104274 
5688 027616 


5691 027616 
027616 104413 
5692 027620 004737 030050 
000001 


000000 0 
5694 027630 040200 000000 
see 027640 034200 000000 
5698 027654 


00040 
5701 027662 104274 
5702 027664 
5703 


5704 
5705 027664 
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000000 
000000 


000000 
000000 


000000 
000600 


000000 
000000 


2s: 
3$: 
4$: 
5$: 


é$: 
; OPERAND=-40000 
LLC5: 


1$: 
2$: 
3$: 
S$: 
5$: 


6$: 
: OPERAND=40000,0 
LLCO: 


6$: 


; OPERAND=0, 1 
Lic?: 


6$: 


43600,0,0,0 
47600,0.0,0 
+276 
6$ 
+274 
FL=0~— FD=1 
PC. LDCDSUB 
40000,0 

1436000, 0, 0 
43600,0,0 
+277 
6$ 
+274 

FL=1 
PC,LDCDSUB 
40000,0 
47600.0,0,0 
43600.0.0.0 
+300 
6$ 
+2764 
FL=1 FD=1 
BC. LDCDSUB 
40200,0,0,0 
34200.0.0.0 
+300 
6$ 
+276 


sEXPECTED RESULT. 


ANTICIPATED ERRONEOUS RESULT. 


3FPS BEFORE EXECUTION. 

FPS AFTER EXECUTION. 
ANTICIPATED ERRONEOUS FPS. 
3ST 107 BAD CONST 


;REPORT FPS INCORRECT. 


;SET UP THE LOOP ON ERROR ADDRESS. 
3GO EXECUTE THE INSTRUCTION. 

;FSRC OPERAND. 

EXPECTED RESULT. 


;ANTICIPATED ERRONEOUS RESULT. 


FPS BEFORE EXECUTION. 

3FPS AFTER EXECUTION. 
ANTICIPATED ERRONEOUS FPS. 
(SET SIGN) ST 176 


REPORT FPS INCORRECT. 


FD=1 


;SET UP THE LOOP ON ERROR ADDRESS. 
3GO EXECUTE THE INSTRUCTION. 
3FSRC OPERAND. 

EXPECTED RESULT. 


TANTICIPATED ERRONEOUS RESULT. 


:FPS BEFORE EXECUTION. 

3FPS AFTER EXECUTION. 
ZANTICIPATED ERRONEOUS FPS. 
37ST 107 BAD CONS 


REPORT FPS INCORRECT. 


;SET UP THE LOOP ON ERROR ADDRESS. 
3GO EXECUTE THE INSTRUCTION. 
3FSRC OPERAND. 

ees ke RESUL 

ANTICIPATED ERRONEOUS RESULT. 

iFPS BEFORE EXECUTION 
SFPS AFTER EXECUTION. | 
[ANTICIPATED ERRONEOUS FPS. 
REPORT FPS INCORRECT. 


REPORT FPS INCORRECT. 


FD=1 


SEQUENCE 


136 


CKFPCCO FRIIF FLTG PNT PRT C 
TEST # 57 = LDCID AND LDCLD TEST 


5706 027666 
5707 027672 
5708 027676 
5709 027706 


5716 027732 


5720 027732 


104412 


000 
104274 


104413 


104274 


104413 


000502 


030050 


177777 


030050 
177526 
000000 
000000 


030050 
067012 
025560 
177777 
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009900 
000000 


050000 
177777 


SEQUENCE 


;SET UP THE LOOP ON ERROR ADDRESS. 
3GO EXECUTE THE INSTRUCTION. 
3;FSRC OPERAND. 
sEXPECTED RESULT. 
sANTICIPATED ERRONEOUS RESULT. 
sFPS BEFORE EXECUTION. 
FPS AT TER EXECUTION. 
ANTICIPATED ERRONEOUS FPS. 
REPORT RESULT INCORRECT. 


;REPORT FPS INCORRECT. 


;SET UP THE LOOP ON ERROR ADDRESS. 
3GO EXECUTE THE INSTRUCTION. 
:FSRC OPERAND. 
sEXPECTED RESULT. 
ZANTICIPATED ERRONEOUS RESULT. 
:FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
ANTICIPATED ERRONEOUS FPS. 
REPORT RESULT INCORRECT. 


;REPORT FPS INCORRECT. 


FD=1 FT=1 


;SET UP THE LOOP ON ERROR ADDRESS. 
7GO EXECUTE THE INSTRUCTION. 
3FSRC OPERAND. 

EXPECTED RESULT. 
ZANTICIPATED ERRONEOUS RESULT. 
:FPS BEFORE EXECUTION. 

:FPS AFTER EXECUTION. 
ANTICIPATED ERRONEOUS FPS. 
REPORT RESULT INCORRECT. 


;REPORT FPS INCORRECT. 


LPERR 

JSR PC,LDCDSUB 
1$: “WORD 77777,177777 
2s: .~ WORD 47777,177777,177000,0 
3$: -WORD <-1,-1,-1,-1 
4$: 317 
S$: ERROR +273 

R 6$ 

ERROR +274 
6$: 
; OPERAND=-PA?T TERN FL=1 FD=1 
LLCO 

LPERR 

JSR PC,LDCDSUB 
13: ~WORD -1,7252 
2$: -WORD 142052,0,0,0 
3$: . WORD 136052,0,0,0 
4$: 307 

336 
S$: ERROR +300 

R 6$ 

ERROR +274 
6$: 
: OPERAND=PAT TERN FL=1 
LLC10: 

LPERR 

JSR aie 
1$: «WORD 12345,67012 
es: WORD 47247, 525560, 050000,0 
3$: .~ WORD -1, oi.1. 
4$: 352 

“eo 
5$: ERROR +273 

R 6$ 

ERROR +274 
6$: R LLCDONE 


; THIS SUBROUTINE, LDCDSUB, 


IS USED TO SET UP THE OPERANDS, EXECUTE 


3; THE LDCID OR LDCLD INSTRUCTION AND CHECK THE RESULTS. A CALL 
3TO IT IS MADE THUS: 


JSR PC,LDCDSUB 
: wORD 


ACARG X,X 3AC OPERAND 

RES: “WORD XXX, sEXPECTED RESULT 
ERRES: .WORD ¥X,X,X,X ;ERROR RESULT 

FPSB: «WORD X FPS BEFORE EXECUTION 
FPSA: «WORD X sFPS o> ren EXECUTION 
ERFPS: WORD xX TERROR FPS, 

ERR1: ERROR +x :DATA ERROR. 


CKFPCCC FRIIF FLTG PNT PRT C 


TEST # 57 = LDCID AND LDCLD TEST 


5778 geoneS 


06 
5807 030170 
5808 030174 
809 030176 


5812 030202 
5813 030206 
5814 penci? 


5815 214 
5816 030220 


Oo 
Ww 
Oo 


174010 


012702 


00 
077303 


026104 
001020 
000161 


012702 
010100 
062700 
012703 
022022 


000024 
030070 


027236 
000200 


027236 
001242 
001240 


000004 


0 
000026 


000004 
000002 


000026 
000040 


027236 


000014 
000002 
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001236 


001252 


SEQUENCE 


ERROR +X ;FPS ERROR. 
sRETURN ADDRESS 


STHE OPERANDS ARE SET UP (USING ACO AS THE ACCUMULATOR). THEN 
[THE LDCID OR LDCLD INSTRUCTION IS EXECUTED. 
7 THE RESULT IS CHECKED AGAINST RES. IF THE RESULT IS CORRECT THEN THE FPS IS 


ERR2: 
CONT: 


[COMPARED WITH FPSA IF THIS TOC IS CORRECT LDCDSUB RETURNS CONTROL 


3TO THE CALLING ROUTINE AT CONT. 
;COMPARE IT TO ERROR FPS. 


IF THE FPS IS BAD LDCDSUB 
IF THIS MATCHES THEN LDCDSUB WILL RETURN 


3TO THE ERROR CALL AT ERR2, OTHERWISE LDCDSUB ITSELF 
;REPORTS THIS FAILURE AND THEN RETURNS TO CONT. IF THE RESULT OF THE 


;LDCID OR LDCLD IS INCORRECT, 
ANTICIPATED FAILING DATA PATTERN, ERRES. 


THE INCORRECT RESULT IS COMPARED WITH THE 
IF THE FAILURE IN 


3 THE RESULT WAS ANTICIPATED CORRECTLY TO BE ERRES THEN LDCDSUB 


;WILL TRANSFER CONTROL TO THE ERROR CALL AT ERR1. 


OTHERWISE THE 


RESULT WAS INCORRECT BUT WAS NOT ANTICIPATED AND LDCDSUB WILL 
;REPORT THE FAILURE AFTER WHICH CONTROL WILL BE PASSED TO CONT. 


LDCDSUB: MOV (SP)+,R1 :GET A POINTER TO THE ARGUMENTS. 
MOV 24(R1) ,RO 3SET THE FPS. 
LDFPS RO 
MOV #1$,$TMP2 
MOV R1,R0 
1$: LDCID (RO) ,ACO 3: TEST INSTRUCTION, LDCID OR LDCLD. 
STFPS R4 ;GET FPS. 
MOV ALDCT,RO ;GET THE RESULT. 
MOV #200,Re 
LDFPS 


R2 
STD ACO, (RO) 


;SEE IF THE RESULT IS CORRECT. 
MOV CT.Re 


ALDCT, 

MOV R2,$TMP4 

MOV R1,$TMP3 

MOV R1,R3 

ADD #4,R3 

MOV R3,$TMP5 

MOV R4,$TMP7 

MOV 26(R1),$TMP10 

MOV R1,RO0 

ADD #4,RO0 

MOV #2,R3 
2$: CMP (RO) +, (R2)+ 

BNE 10$ 7BR IF INCORRECT. 

SOB R3,2$ 

CMP 26(R1) RS :I1S THE FPS CORRECT? 

BNE 15$ ;BR “ INCORRECT. 
3$: JMP 40(R1) ZRETU 
; THE RESULT WAS INCORRECT SO SEE IF THE ERROR WAS ANTICIPATED. 
10$: MOV MLDCT,R2 

MOV R1,RO 

ADD #14,R0 

MOV 


#2,R3 
(RO) +, (R2)+ 


138 
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TEST # 57 = LDCID AND LDCLD TEST 


5817 030222 001002 BNE 13$ 
5818 030224 077303 SOB R3,11$ 
5819 030226 000161 000032 JMP 32(R1) 
5820 030232 13$: 
5821 ;ERROR NOT ANTICIPATED SO REPORT RESULT INCORRECT HERE. 
5822 030232 104273 148: ERROR +273 ;BAD RES 
re yt 030234 000760 BR 3 
; THE FPS WAS INCORRECT. SEE IF FAILURE WAS ANTICIPATED. 
826 0302 026104 000030 15$: CMP 30(R1),R4 
5827 030242 001002 BNE 16$ 
5828 030244 000161 000036 JMP 36(R1) 
5829 3FPS ERROR WAS NOT ANTICIPATED SO REPORT FAILURE HERE. 
rts 030250 168: 
5832 030250 104274 17%: ERROR +274 ;BAD FPS 
rth 030252 000751 BR 3$ 
5835 030254 LLCDONE : 
0270254 104412 RSETUP :GO INITIALIZE THE FPS AND STACK; AND 


5836 
5845 


SSEE IF THE USER HAS EXPRESSED 

7 THE DESIRE TO CHANGE THE SOF TWARE 
ZVIRTUAL CONSOLE SWITCH REGISTER (HAS 
3 THE USER TYPED CONiROL G?). 


| CKFPCCO FRTIF FLTG PNT 
TEST # 60 = LDEXP TEST 


5846 


5861 030334 


5864 030336 
030336 


5 

5887 030456 
5888 030460 
5889 030462 


000004 


104413 
7 


177777 
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031622 
067012 034567 


067012 034567 
067012 034567 


031622 
070123 045670 


070123 045670 
070123 045670 


031622 
057645 043323 


057645 043323 
177777 =177777 





» SBTTL TEST # 60 = LDEXP TEST 


TOPREEPPSSESSAERSSSESE SSE SERRE SER SESE RR RRR RRR RRR RRR RRR RRR RRR RRR O OS 


:*TEST 60 LDEXP TEST 


se THIS IS A TEST OF THE LDEXP o 

;* A SUBROUTINE IS USED TO SET 

;* OPERANDS, EXECUTE THE LDEXP INST AND 
3* CHECK THE RESULTS. 


oe 
. 
5 ARERR EEREEERRERERREEERERRRRRKEKEERERERRERRRRARRERER AES 


TST60: SCOPE 
iq NON-ZERO RES. VALID EXPON=210 (EXCESS 200)=10 


LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
JSR 0 EXECUTE THE INSTRUCTION. 
1$: WORD 1085, 07012, 3456h, 0153 45 :ACO OPERAND. 
2$: “wORD 10 XPONENT OPERAND . 
3$: “WORD 42145,67012, 34569. O72 sEXPECTED RESULT. 
4$: "WORD 2145,67C12, 34567, bate sANTICIPATED ERRONEOUS RESULT. 
5$: 47217 FPS BEFORE EXECUTION. 
47200 ‘FPS AFTER EXECUTION. 
147200 ZANT ICIPATED ERRONEOUS FPS. 
-1 s EXPECTED FEC 
6S: ERROR +304 7€12+E12+200 BAD 
BR 7$ SST 624 
7$: ERROR +305 “REPORT FPS INCORRECT. 
.ST 625 INTO 394 
:NON-ZERO RES NEG. 
MMC2: 
LPERR ‘s :SET ole THE LOOP ON ERROR ADDRESS. 
1$: . WORD 158456. 18123, 45670, 138456 :ACO OPERAND. 
2$: “wORD 177 XPONENT OPERAND . 
3$: “WORD 177656,70123, 45670" 123456 ZEXPECTED RESULT. 
4$: "WORD 137656.70123.45670,123456 ‘ANTICIPATED ERRONEOUS RESULT. 
S$: 47207 :FPS BEFORE EXECUTION. 
47210 ;FPS AFTER EXECUTION. 
147210 ANTICIPATED ERRONEOUS FPS. 
-1 S EXPECTED FEC 
68: ERROR +304 :REPORT RESULT INCORRECT. 
‘< ERROR +305 :REPORT FPS INCORRECT. 
{NON-ZERO RES, EXP=256= (56) REAL 
LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
JSR O EXECUTE THE INSTRUCTION. 
1$: WORD P56) x 645. 43323. 101760 -ACO OPERAND. 
2$: “WORD 56 ONENT OPERAND. 
3$: “WORD 53461, 057645, 43353 Aol 0 TEXPECTED RESULT. 
4$: "WORD -1,-1.-1,-1 ANTICIPATED ERRONEOUS RESULT 
S$: 47200 FPS perore EXECUTION. 
47200 ‘FPS AFTER EXECUTION. 
147200 TANTICIPATED ERRONEOUS FPS. 
-1 SEXPECTED FEC. 


rc- - -_ — 
' 


L_11 
aes FPI1IF FLTG PNT PRT C MACRG M1113 O9=APR=81 13:53 PAGE 57=1 SEQUENCE 141 
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5890 030464 104301 6$: ERROR +791 ;REPORT RESULT INCORRECT. 
5891 030466 000401 BR 3 
/  §892 030470 104305 ERROR +305 :REPORT FPS INCORRECT. 
5893 030472 7$: : 
| §g94 
| 5895 SEXP=27 (EXCESS 200)=-151 (OCT) 
| — §896 030472 MMC : 
30472 104413 LPERR iSET uP THE LOOP ON ERROR ADDRESS. 
|  §897 030474 004737 031622 JSR ECUTE THE INSTRUCTION. 
5898 030500 012223 024252 062720 1$: WORD 15553. 32352, caret 21322 ACO OPERAND . 
5899 030510 177627 2$: “WORD =151 1 OPERAND. 
5900 030512 005623 024252 062720 3$: "WORD 5623, 24252, 62720. BoDo s EXPECTED RESULT. 
5901 030522 177777 177777 +177777. 4S: "WORD =1,-1,-1,-1 :ANTICIPATED ERRONEOUS RESULT. 
5902 030532 047200 S$: 47200 :FPS BEFORE EXECUTION. 
5903 030534 047200 47200 ‘FPS AFTER EXECUTION. 
$904 030536 147200 147200 ANTICIPATED ERRONEOUS FPS. 
5905 030540 177777 -1 SEXPECTED FEC. 
5906 030542 104301 6$: ERROR +301 :REPORT RESULT INCORRECT. 
5907 030544 000401 BR 7$ 
5908 020546 104306 ERROR +306 ; (BUT EZBT) ST 544 TO 504 INTO 704 O (BUT EXBT) ST 704 INTO 
2909 030550 7$: 
5911 sEXP=0 (EXCESS 200)=-200 (OCT), POSITIVE FRAC 
5912 > FIV=1 
5913 030550 ; 
030550 104413 LPERR + UP THE LOOP ON ERROR ADDRESS. 
5914 030552 004737 031622 JSR EXECUTE THE INSTRUCTION. 
5915 030556 030131 032336 035363 1$: WORD BOTs) M8 34, 55363, 73031 =ACO OPERAND . 
5916 030566 177600 2$: “WORD =200 PONENT OPERAND 
5917 030570 000131 032334 035363 3$: "WORD 00131,32334, 35365, *303 EXPECTED RESULT. 
5918 030600 000000 000000 000000 4$: “wORD 0,0,0.0 SATICIPATED ERRONEOUS RESULT 
5919 030610 042200 5$: 42200 OPS BEFORE EXECUTION. 
5920 030612 142204 142204 SFPS AFTER EXECUTION. 
5921 030614 042202 42202 ‘ANTICIPATED ERRONEOUS FPS. 
5922 030616 000012 12 sEXPECTED FEC. 
5923 030620 104307 63: ERROR +307 = (BUT EXBT) ST 794 TO 64 INST 264 
5924 030622 000401 BR 7$ 
5925 030624 104310 ERROR +310  ;(BUT FIU) ST 264 X 
926 030626 7$: 
5928 sEXP=0 (EXCESS 200)=-200 (OCT), NEG FRACT,FIU=1 
5929 030626 MMC6: 
030626 104413 LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
5930 030630 004737 031622 JSR O_EXECUTE THE INSTRUCTION. 
5931 030634 140414 024344 045464 18: WORD vA a OT 344, “sabe, 7404 45 ACO OPERAND. 
5932 030644 177600 2$: “WORD 200 > EXPONENT OPE RAND. 
5933 030646 100014 024344 045464 3$: "WORD 100014,24344, 45464, 74045 ~0 sEXPECTED RESULT. 
5934 030656 000000 000000 000000 4$: “wORD 0,0,0,0 ANTICIPATED ERRONEOUS RESULT. 
5935 030666 042200 S$: 42200 “FPS BEFORE EXECUTION 
5936 030670 142214 142214 ‘FPS AFTER EXECUTION. 
5937 030672 042214 42214 zANT ICIPATED ERRONEOUS FPS. 
5938 030674 000012 12 sEXPECTED FEC. 
5939 030676 104307 63: ERROR +307 :REPORT RESULT INCORRECT. 
5940 030700 000401 BR 7$ 
5941 030702 104310 ERROR +310 :REPORT FPS INCORRECT. 
2942 030704 7$: 


on 
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| 
| are sEXP=0 (EXCESS 200)==200 (OCT),POS FRAC, FIU=0 
| 
| 5946 030704 MMC7: 
030704 104413 LPERR set 4 THE LOOP ON ERROR ADDRESS. 
5947 030706 004737 031622 JSR PC,LDXSUB ECUTE THE INSTRUCTION. 
| 5948 030712 051525 035455 005675 1$: . WORD 51525, 35455, 5675. obo. ;ACO OPERAND. 
5949 030722 177600 2$: «WORD 200 sEXPONCNT OPERAND. 
5950 030724 000000 000000 000000 3$: -WORD Q,0,0,0 ;EXPECTED RESULT. 
5951 030734 000125 035455 005675 4$: "WORD 00125°35455,5675. 2051 52 ZANT ICIPATED ERRONEOUS RESULT. 
5952 030744 045200 45200 PS BEFORE EXECUTION 
5953 030746 045204 45204 EPS AFTER EXECUTION. | 
5954 030750 145204 145204 ZANTICIPATED ERRONEOUS FPS. 
5955 030752 177777 -1 :EXPECTED FEC. 
5956 030754 104311 6$: ERROR +317 (BUT FIU) ST 264 Xx REPORT RESULT INCORRECT. 
5957 030756 000401 BR 7$ 
5958 030760 104302 ERROR +302 REPORT FPS INCORRECT. 
4444 030762 7$: 
5961 sEXP=-1405 (EXCESS 200)=-1605 (OCT), FIU=1 
5962 020762 MMC8: 
030762 104413 LPERR ser UP THE LOOP ON ERROR ADDRESS. 
5963 030764 004737 031622 JSR EXECUTE THE INSTRUCTION. 
5964 030770 061626 062636 046566 1$: . WORD 51656 25636, 46568 67606. gACO OPERAND. 
5965 031000 176173 2$: WORD -1605 ;EXPONENT OPERAND. 
5966 031002 076626 062636 046566 3$: -WORD  76626,62636, 46566, 67606 EXPECTED RESULT. 
5967 031012 000000 000000 000000 4$: “wORD 0,0,0.0 ANTICIPATED ERRONEOUS RESULT. 
5968 031022 042200 S$: 42200 “FPS BEFORE EXECUTION. 
5969 031024 142200 142200 :FPS AFTER EXECUTION. 
5970 031026 042204 42204 ‘ANTICIPATED ERRONEOUS FPS. 
5971 031030 000012 12 sEXPECTED FEC. 
5972 031032 104312 6$: ERROR +312 : (BUT EZBT) ST 544 TO 704 INTO 504 
5973 031034 000401 BR , wee 
5974 031036 104302 ERROR +302 REPORT FPS INCORRECT. 
5975 031040 7$: 
5976 sEXP=-17416 (EXCESS 200)=-17616 (OCT), FIU=0 
5977 031040 MMC9: 
031040 104413 LPERR ser oe THE LOOP ON ERROR ADDRESS. 
5978 031042 004737 031622 JSR CUTE THE INSTRUCTION. 
5979 031046 071727 037475 076777 1$: . WORD Poor 3ye75, ae 97535 YACO OPERAND. 
5980 031056 160162 2$: . WORD a 7610 sEXPONENT OPERAND. 
5981 031060 000000 000000 000000 3$: . WORD 0,0.0 -EXPECTED RESULT. 
5982 031070 074527 037475 076777 4$: . WORD 91859 Soa 75, 76777. 17273 ZANTICIPATED “ERRONEOUS RESULT. 
5983 031700 045200 S$: 45200 PS BEFORE EXECUTION 
5984 031102 045204 45204 eps AFTER EXECUTION. | 
5985 031104 145200 145200 ‘ANTICIPATED ERRONEOUS FPS. 
5986 031106 177777 -1 sEXPECTED FEC. 
5987 031110 104313 6$: ERROR +313 :(BUT FIU) ST 504 
5988 031112 000401 BR 7$ 
5989 031114 104302 ERROR +302 REPORT FPS INCORRECT. 
oo 031116 7$: 
5992 sEXP=-1601 (EXCESS 200)=-2001 (OCT), FIU=1 
5993 031116 MMC 10: 
031116 104413 LPERR SET. ee. THE LOOP ON ERROR ADDRESS. 
5994 031120 004737 031622 JSR CUTE THE INSTRUCTION. 
5995 031124 001020 030405 006070 1$: . WORD 01620, 30205, 0607; 50700 sACO OPERAND. 
5996 031134 175777 2%: . WORD EXPONENT OPERAND. 


=o 


a 


| 
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6017 031240 
6018 031242 
6019 031244 
6020 031246 
6021 031250 
one 031252 


6025 031252 


7's 031330 


6042 031330 


6050 031374 


TEST # 60 = LDEXP TEST 


037620 
000000 


104302 


104413 


041204 
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030405 
000000 


031622 
014151 


014151 
000000 


031622 
025242 


000000 
025242 


031622 
032333 


032333 
000000 
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006070 
000000 


016171 


016171 
000000 


023222 


000000 
023222 


034353 


034353 
000000 


SEQUENCE 143 


3$: . WORD 4 <) Weems 00102 EXPECTED RESULT. 
4$: . WORD -V.0, ANTICIPATED ERRONEOUS RESULT. 
5$: 200 :FPS BEFORE EXECUTION. 
142200 FPS AFTER EXECUTION. 
42204 ANTICIPATED ERRONEOUS FPS. 
2 sEXPECTED FEC. 
6$: tas a 3 (BUT TIU) ST 504 
3 ERROR +302 sREPORT FPS INCORRECT. 


7EXP=1206 (EXCESS 200)=1006 (OCT) FIV =1 
MMC11: 


LPERR +i UP THE LOOP ON ERROR ADDRESS. 
JSR aSi at EXECUTE THE INSTRUCTION. 
1$: «WORD 12131,14151, 16171, CEL ACO OPERAND. 
2$: -WORD 1006  EXPON ONENT OPERAND. 
3$: -WORD 41531,14151, 16171, 10111 sEXPECTED RESULT. 
4$: -WORD 0,0,0,0 ANTICIPATED ERRONEOUS RESULT. 
5$: 41200 [FPS BEFORE EXECUTION. 
141202 sFPS AFTER EXECUTION. 
41204 SANTICIPATED ERRONEOUS FPS. 
10 sEXPECTED FEC 
6$: — SH ;(BUT FIV) ST 104 
- ERROR +302 REPORT FPS INCORRECT. 


zExP=16315 (EXCESS 200)=16115 (OCT) FIV=0 
:SET, UP THE LOOP ON ERROR ADDRESS. 


JSR PC,LDXSUB ECUTE THE INSTRUCTION. 
1$: .WORD 27262,25242, 23225° 21202. ACO OPERAND . 
2$: .~WORD 16115 EXPONENT OPERAND. 
3$: “WORD 0,0,0,0 SEXPECTED RESULT. 
4$: “WORD 63262.25242, 232222 :ANTICIPATED ERRONEOUS RESULT. 
5$: 46200 tbs _ EXECUTION. 
46206 [FPS AFTER EXECUTION. 
146202 ‘ANTICIPATED ERRONEOUS FPS. 
-1 sEXPECTED FEC. 
6$: _ a 7 (BUT FIV) ST 104 
- ERROR +302 :REPORT FPS INCORRECT. 
yEXP=11011 (EXCESS 200)=10611 (OCT) FIVv=1 
MMC 13 
LPERR +-4f or THE LOOP ON ERROR ADDRESS. 
JSR PC,LDX CUTE THE lathe 
1$: . WORD Bost Sg 35333, 34355, 36373 VACO OPE 
2$: “WORD 10611 XPONENT OPE RAD 
3$: “WORD 23153, 32333, 34353, BO378 sEXPECTED RESULT. 
4$: “WORD 0,0,0,0 ANTICIPATED ERRONEOUS RESULT. 
5$: 41200 “FPS BEFORE EXECUTI 
141202 [FPS AFTER EXECUTION, 
41204 SANTICIPATED ERRONEOUS FPS. 
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6051 031376 
6052 031400 
6053 031402 

031404 
031406 


SoS 


Nm 
oO 
W 
— 
* 
Nm 
a 


6072 031464 


5 
6076 031464 


6089 031542 
90 


6093 031542 


6104 031614 


00001C 
104316 
000401 
104302 


104413 
004737 


000401 
104302 


104413 


104302 


104413 


000401 


PRT C 


031622 
042434 


000000 
042434 


031622 
052535 


052535 
000000 


031622 
062636 


000000 
062636 
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044454 


000000 
044454 


054555 


054555 
000000 


064056 


000000 
064656 


| 
10 sEXPECTED FEC. . | 
6$: ERROR +316 3s (BUT FIV) ST 144 
BR 7$ % 
ia ERROR +302 ;REPORT FPS INCORRECT. 
sEXP=17123 (EXCESS 200)=16723 (OCT) FIV=0 
MMC14: 
LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
JSR PC,LDXSUB EXECUTE THE INSTRUCTION. 
1$ ~ WORD 40414,42434, 444654, yey a OPERAND. 
t “WORD 16723 :£ ENT OPERAND. 
3$ .WORD 0,0,0,0 sEXPECTED RESULT. 
4$ “WORD 24614,42434, 44454, 46474 ZANTICIPATED ERRONEOUS RESULT. 
46200 FPS BEFORE EXECUTION. 
46206 FPS AFTER EXECUTION. 
146202 ‘ANTICIPATED ERRONEOUS FPS. 
-1 sEXPECTED FEC. 
6$: sa +317 : (BUT FIV) ST 144 
BR 
Pa ERROR +302 sREPORT FPS INCORRECT. 
*EXP= 254 (OCT)= 454 (EXCESS 200) FIVv=1 
MMC 15 
LPERR 4-48 UP THE LOOP ON ERROR ADDRESS. 
JSR PC,LDXSUB XECUTE THE INSTRUCTION. 
1$ ~WORD 50515,52535, 54555. 56575 zACO OPERAND. ° 
$ WORD 254 NT OPERAND. 
3$ “WORD $34 15 ,52535 54558, 4657 3 sEXPECTED RESULT. 
4$: ~ WORD 0.0.0.0 sANTICIPATED ERRONEOUS RESULT. 
S$: 41200 “FPS BEFORE EXECUTION. 
141202 ‘FPS AFTER EXECUTION. 
41204 “ANTICIPATED ERRONEOUS FPS. 
10 :EXPECTED FEC. 
6$: — ie : (BUT FIV) ST344 
$ ERROR +302 sREPORT FPS INCORRECT. 
sEXP= 313 (OCT)= SI3(EXCESS 200) FIV=0 
MMC 16: 
LPERR SET uP THE LOOP ON ERROR ADDRESS. 
JSR PC, LDXSUB ECUTE THE INSTRUCTION. 
1$: .WORD  60616,62636, 64656. B6E76 -ACO OPERAND. 
2$: “WORD 313 :EXPONENT OPERAND. 
3$: “WORD 0,0,0,0 s EXPECTED RESULT 
4$: “WORD  22616.62636, 64656, 66676 Z ANTICIPATED ERRONEOUS RESULT. 
5$: 46200 PS BEFORE EXECUTION 
46206 sep AFTER EXECUTION. 
146202 ‘ANTICIPATED ERRONEOUS FPS. 
-1 sEXPECTED FEC. 


6$: ERROR +321 ; (BUT FIV) ST 344 
BR 7$ 
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TEST # 60 = LDEXP TEST 


6105 031616 104302 ERROR +302 ;REPORT FPS INCORRECT. 

6106 031620 7$: 

ride 031620 000540 BR MMC DONE 

6109 ; THIS SUBROUTINE, LDXSUB, IS USED TO SET UP a OPERANDS, EXECUTE 
6110 * THE LDEXP INSTRUCTION AND CHECK THE RESULTS. A CALL 

6111 :TO IT IS MADE THUS: 

6112 : 

6113 ; JSR PC, LDXSUB 

6114 : ACARG: .WORD KMXMX ;AC OPERAND 

6115 5 EXP: WORD x 7 EXPONENT 

6116 ; ES: ~WORD X,X,X,X ;EXPECTED RESULT 
6117 : ERRES: .WORD X,X,X,X ;ERROR RESULT 
6118 F PSB: ~ WORD x :FPS BEFORE EXECUTION 
6119 Z FPSA: WORD x sFPS AFTER EXECUTION 
6120 ; ERFPS: WORD x ;ERROR FPS. 

6121 : FEC: -WORD  X sEXPECTED FEC 
6122 2 ERR1: ERROR +X ZDATA ERROR. 

6123 : BR CONT 

6124 Z ERR2: ERROR +X sFPS ERROR. 

at ty ; CONT: ZRETURN ADDRESS 
6 ; 

6127 ; THE OPERANDS ARE SET UP (USING ACO AS THE ACCUMULATOR). THEN 
6128 : THE LDEXP INSTRUCTION IS EXECUTED. 

6129 *THE RESULT IS CHECKED AGAINST RES. IF THE RESULT IS CORRECT THEN THE FPS IS 
6130 ; COMPARED WITH FPSA IF THIS TOO IS CORRECT LDXSUB RETURNS CONTROL 
6131 3TO THE CALLING ROUTINE AT CONT. IF THE FPS IS BAD LDXSUB 

6132 : > COMPARE IT TO ERROR FPS. IF THIS MATCHES THEN LDXSUB WILL RETURN 
6133 ;TO THE ERROR CALL AT ERR2, OTHERWISE LDXSUB ITSELF 

6134 >REPORTS THIS FAILURe AND THEN RETURNS TO CONT. IF THE op og OF THE 
6135 *LDEXP IS INCORRECT, THE INCORRECT RESULT IS COMPARED WITH THE 
6136 ;ANTICiPATED FAILING DATA PATTERN, ERRES. IF THE FAILURE IN 

6137 s THE RESULT WAS ANTICIPATED CORRECTLY TO BE ERRES THEN LDXSUB 
6138 sWILL TRANSFER CONTROL TO THE ERROR CALL AT ERR1. OTHERWISE THE 
6139 ;RESULT WAS INCORRECT BUT WAS NOT ANTICIPATED AND LDXSUB WILL 
ont sREPORT THE FAILURE AFTER WHICH CONTROL WILL BE PASSED TO CONT. 
6142 031622 012601 LDXSUB: MOV (SP)+,R1 :GET A POINTER TO THE ARGUMENTS. 
6143 031624 012700 000200 MOV #200,R0 ;LOAD THE ACO OPERAND. 

6144 031630 170100 LDFPS RO 

6145 031632 010100 MOV R1,R0 

6146 031634 172419 LDD (RO) ,ACO 

6147 031636 012737 031660 001236 MOV #1$,$TMP2 

6148 031644 016100 000032 MOV 32(R1),RO ;SET UP THE FPS. 

6149 031650 170100 LDFPS RO 

6150 031652 010100 MOV R1,RO0 

or) 031654 062700 000010 ADD #10,R0 

ott? 031660 176410 1$: LDEXP (RO) ,ACO ; TEST INSTRUCTION. 

6155 031662 170204 STFPS R4 :GET THE FPS. 

6156 031664 170305 STST R5 :GET THE FEC. 

6157 031666 012700 000200 MOV #200,R0 ;GET THE RESULT. 

6158 031672 170100 LDFPS RO 

6159 031674 012700 032112 MOV ALDXT,RO 

6160 031700 174010 STD ACO, (RO) 

6161 031702 010437 001250 MOV R4,$TMP7 


CKFPCCO FRIIF FLTG PNT 
TEST # 60 = LDEXP TEST 


6184 032026 
6186 032030 


06 
534 032102 
6209 032102 
6210 032104 
6213 032106 


6215 032106 
osi¢ 032110 


016137 


601027 
000161 


012702 


000161 


104301 
000760 


026104 
001002 
000161 


104302 
000751 


104303 
000747 


032112 


000012 
000004 


000034 
000034 
000040 


000050 
032112 


000022 
000004 


000042 


000036 
000046 


0.12 
MACRO M1113 O9-APR=81 13:53 PAGE 57-6 SEQUENCE 146 


001252 
001256 


001246 


MOV oe ores P+ ati 
MOV R5,$T™™ 
MOV 40(R1), sie i2 
MOV R1,R2 
MOV oF “$TMP3 
ADD #10,R R2 
MOV (Re $TMP4 
ADD R2 
MOV RS. *$TMPS5 
MOV #LDXT,STMP6 
MOV #LDXT.R2 sSEE IF THE RESULT WAS CORRECT. 
MOV R1,R3 
ADD #12,R3 
MOV #4,R0 
2$: CMP (R2)+, (R3)+ 
BNE 10$ ;BRANCH IF NOT CORRECT. 
SOB RO,2$ 
CMP R4,34(R1) sSEE IF THE FPS WAS CORRECT. 
BNE 15$ :BRANCH IF NOT CORRECT. 
TST 34(R1) 
BPL 3$ 
CMP R5,40(R1) ;SEE IF THE FEC WAS CORRECT. 
BNE 20$ ;BRANCH IF NOT CORRECT. 
%$: JMP 50(R1) sRETURN. 
:THE RESULT WAS INCORRECT SO SEE IF THE FAILURE WAS ANTICIPATED. 
10$: MOV #LDXT,R2 
MOV R1,R 
ADD #22. R3 
MOV RO 
11$: CMP (3), (R3)+ 
BNE 12$ 
SOB RO,11$ 
JMP 42(R1) 
ie ERROR WAS NOT ANTICIPATED SO REPORT IT HERE. 
13$: ERROR +301 ZBAD RES 
BR 3$ 


;SEE IF THE FPS ERROR WAS ANTICIPATED. 
15$: CMP 36(R1) ,R4 


BNE 16$ 
JMP 46(R1) 


16$: 

: THE FPS WAS NOT ANTICIPATED SO REPORT IT Hi F 

17$: ERROR +302 ;BAD FPS 

BR 3$ ;BUT EZBTY8 
7ST 063 

20$: 

sREPORT FEC INCORRECT. 
els: ERROR a BAD FEC 


;DATA BUFFER: 


—CKEPCCO FPTIF FLTG PNT PRT C 
TEST # 60 = LDEXP TEST 


esi) 032112 00000C 000000 


62 
| 6221 032122 
032122 104412 





E_12 
MACRO M1113 O9-APR=81 13:53 PAGE 57-7 


OOCO0O LDxT: .WORD 0,0,0,0 


MMCDONE : 
RSE TuUP 


3GO INITIALIZE THE FPS AND STACK; AND 
7SEE IF THE USER HAS EXPRESSED 

THE DESIRE TO CHANGE THE SOF TWARE 
SVIRTUAL CONSOLE SWITCH REGISTER (HAS 
3 THE USER TYPED CONTROL G?). 


SEQUENCE 


147 


c-- 
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CKFPCCO FRTIF FLTG PNT PRT C MACRO M1113 O9-APR=81 13:53 PAGE 58 SEQUENCE 148 
TEST # 61 = DESTINATION MODES, MODE 1 (FL=0), TEST 


6251 ~SBTITL TEST # 61 = DESTINATION MODES, MODE 1 (FL=0), TEST 


TEPPER RPS RSE SSRE RRR SE ERR RRR RSE R RRR RS RRR SRR RRR RRR RRR RRR RRR RARER ESD! 


ATES 61 DESTINATION MODES, MODE 1 (FL=0), TEST 


>» THIS IS A TEST OF DESTINATION MODE 1 USING 

:* THE STFPS INSTRUCTION 

*“* 

LARA ORR R EERE ERROR EERE EERE ERR REE ERE E EERE EER RRR REE 
T 


032124 000004 ST61: SCOPE 
6232 
6233 
6234 032126 NNC1: 
032126 104413 : LPERR ‘st UP THE LOOP ON ERROR ADDRESS. 
6235 032130 012700 032226 MOV #NNCTBO,RO SET UP THE DATA BUFFER. 
6236 032134 012701 000006 MOV #6,R1 
6237 032140 012720 177777 1$: MOV #-1,(RO)+ 
6238 032144 077103 healt SOB R1,1 
6239 032146 012700 102545 MOV #102345,R0 
6240 032152 012737 032174 001236 MOV #NNC2,$TMP2 
6241 022160 012737 032326 000004 MOV HNNC25,ERRVECT ;SET UP FOR TRAPS TO 4, 
6242 032166 170100 LDFPS RO sSET W FPS. 
ose? 032179 0127 032232 MOV #NNCTB1,RO 
6245 032174 170210 NNC2: STFPS (RO) sTest INSTRUCTION. 
6246 032176 020027 032232 CMP RO,ANNCTB1 71S RO CORRECT 
6247 032202 001017 BNE NNC10 ‘BR ANCH IF NOT CORRECT. 
6248 032204 023727 032232 102345 CMP NNCTB1,4102345 iS he CORRECT? 
6249 032212 001023 BNE NNC15 : BRAN CH IF NOT CORRECT. 
6250 032214 023727 032234 177777 CMP NNCTB1+2,4=1 IS THE RESULT CORRECT? 
6251 032222 001030 BNE NNC 20 :BRANCH IF NOT CORRECT. 
Oce6 032224 000453 BR NNCDONE 
6254 : TEST DATA BUFFER: 
6255 032226 177777 177777 NNCTBO: .WORD -i,-1 
rats] 032232 177777 #177777 «#177777 NNCTB1: .WORD -1,-1,-1,71 
625 
6258 a ~ a INCORRECT. 
6259 032242 010037 001242 NNC10: RO, STMP4 
6260 032246 012737 032232 001240 mov #NNCTB1,$TMP3 
6261 032254 1$: 
032254 104377 ERROR +377 
032256 000001 -WORD 1 
6262 RO = (BUT 
ath 032260 000435 BR NNCDONE ; FDST)X 
6265 :REPORT RESULT INCORRECT. 
6266 032262 012737 102345 001240 NNC15: MOV #102345, $TMP3 : ST 634 
6267 032270 013737 032232 001242 MOV NNCTB1,$TMP4 
6268 032276 1$: 
032276 104377 ERROR +377 
__ 032300 000002 -WORD 2 
6269 ZBAD DATA 
6270 032302 000424 BR NNCDONE 
6271 
6272 
6273 SREPORT RESULT INCORRECT. 
6274 032304 012737 177777 001240 NNC20: MOV a-1,$TMP z 


CKFPCCO FRPTIF FLTG PNT PRT C 


TEST # 61 = DESTINATION MODES, MODE 1 
013737 032234 001242 


6275 03e312 

6276 032320 

032320 

, 032322 

6278 032324 
62 


84 032326 


6294 032354 
032354 


104377 
900003 


000413 


011604 
020427 
001402 
000137 


011637 
022626 


104377 
000004 


104412 


032176 
047302 
001236 


G 12 
MACRO M7113 O9=APR=81 13:53 PAGE 58-1 
(FL=0), TEST 


MOV NNCTB1+2,$7MP4 


ERROR +377 
«WORD 3 

; (BUT GR7,FL) 
BR NNCDONE sST 357 TO 416 


INTO 417 


z:1F A TRAP TO VECTOR 4 OCCURS COME HERE TO SEE IF THE TRAP OCCURRED 
;DURING EXECUTION OF THE FPP INSTRUCTION BEING TESTED, IF NOT GO 
31TC_THE SPURIOUS TRAP TO 4 HANDLER. 


NNC25: MOV (SP) ,RS 

CMP R4,ANNC2+2 

BEQ i$ 

JMP CPSPUR 
18: MCV (SP) ,$TMP2 

CMP (SP) +, (SP) + 
2$: 

ERROR +377 

. WORD 4 

: (BUT FDST)+ 57634 

NNCDONE : 

RSE TUP 260 INITIALIZE THE FPS AND STACK; AND 


;SEE IF THE USER HAS EXPRESSED 

; THE DESIRE TO CHANGE THE SOF TWARE 
ZVIRTUAL CONSOLE SWITCH REGISTER (HAS 
7 THE USER TYPED CONTROL G?). 


SEQUENCE 


149 
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CKFPCCO FRPTIF FLTG PNT PRT C MACRO M1113 O9-APR=-81 13:53 PAGE 39 SEQUENCE 150 
TEST @ 62 = DESTINATION MODES, MODE 2 (FL=0), TEST 


6297 -SBTTL TEST # 62 = DESTINATION MODES, MODE 2 (FL=0), TEST 


RRR EERE RARET ERE RERP ERHARD 


TeTEST 62 DESTINATION MODES, MODE 2 (FL=0), TEST 


:* THIS IS A TEST OF DESTINATION MODE 2 USING 
3* THE STFPS INSTRUCTION 
SS ERRATA EREERETEARREEEKEEEEHREERHHAH eRe eeeee 


_ _ 932356 000004 TST62: SCOPE 
| 6298 
6299 
6300 032360 00C1: 
032360 104413 LPERR SET UP THE LOOP ON ERROR ADDRESS. 
6301 032362 012700 032460 MOV #00CTBO,RO SET UP THE DATA BUFFER. 
6302 012701 000006 MOV #6,R1 
303 032372 012720 177777 1$: MOV #-1,(RO)+ 
| 6304 032376 077103 SOB R1,1$ 
| 6305 032400 012700 105412 MOV #105412,R0 
| 6306 032404 012737 032426 001236 MOV #O00C 2, $TMP2 
6307 022412 012737 032560 000004 MOV #O00C25,ERRVECT ;SET UP FOR TRAPS TO VECTOR 4. 
| 6308 032420 170100 LDFPS RO *SET UP FPS. 
OD 032422 0127 032464 MOV #00CTB1,RO 
6311 032426 170220 OOC2:  STFPS (RO)+ TEST INSTRUCTION. 
6312 032430 020027 032466 CMP RO,400°1TB1+2 31S RO CORRECT? 
6313 032434 001017 BNE 00(10 *BRANCH IF NOT CORRECT. 
6314 032436 023727 032464 105412 CMP OOCTB1,4105412 ;IS THE RESULT CORRECT? 
6315 032444 001023 BNE 00¢€15 ‘BRANCH IF NOT CORRECT. 
6316 032446 023727 032466 177777 CMP OOCTB1+2,#-1 ;:!5 THE RESULT CORRECT? 
6317 032454 001030 BNE 00C 20 BRANCH IF NOT CORRECT. 
oes 032456 000453 BR OOC DONE 
6320 TEST DATA BUFFER: 
6321 032460 177777 177777 OOCTBO: .wORD <-i,-1 
OsS6 032464 177777 177777 177777 OOCTB1: .WwORD <-1,-1,-1,-1 
6324 pREnOnT RO INCORRECT. 
6325 032474 010037 001242 00C10: MOV RO, STMPS 
6326 032500 012737 032466 001240 MOV #OOCTR1+2, $TMP3 
6327 032506 1$: 
032506 104377 ERROR +377 
032510 000005 .~ WORD 5 
6328 ;RO BAD (BUT 
on? 032512 000435 eye) OOCDONE 3 FDST)X 
6331 ;REPORT RESULT INCORRECT. 
6332 032514 012737 105412 001240 00C15: MOV #105412, $1MP3 : ST 634 
6333 032522 013737 032464 001242 MOV OOC TBI, $TMP4 
6334 032530 1$: 
032530 104377 ERROR +377 
032532 000006 -WORD 6 
6335 ;BAD DATA 
6336 032534 000424 BR OOC DONE 
6337 
6338 
6339 ;REPORT RESULT INCORRECT. 
6340 032536 012737 177777 001240 O00C20: MOV #-1,$TMP3 





po Oe 
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CKFPCCO FPIIF FLTG PNT PRT C MACRO M1113 O9=APR=81 13:53 PAGE 59-1 : SEQUENCE 
TEST # 62 = DESTINATION MODES, MODE 2 (FL=0), TEST 


6341 032544 013737 032466 001242 MOV O0CTB1+2,$TMP4 
6342 032552 1$: 
032552 104377 ERROR +377 
| 032554 000007 WORD 7 
| 6343 : (BUT GR7,FL) 
6344 032556 000413 BR OCCDONE :ST 357 TO 416 
tee INTO 417 
| 6347 z1F A TRAP TO VECTOR 4 OCCURS COME HERE TO SEE IF THE TRAP OCCURRED 
| = 6348 DURING EXECUTION OF THE FPP INSTRUCTION BEING TESTED, IF NOT GO 
6349 TC THE SPURIOUS TRAP TO 4 HANDLER. 
6350 032560 011604 00C25: MOV (SP) ,R4 
| 6351 032562 020427 032430 CMP R4,A#00C2+2 
| 6352 032566 001402 BEQ 1$ 
6395 032570 000137 047302 JMP CPSPUR 
6355 032574 011637 001236 1$: MOV (SP) ,$TMP2 
6356 032600 022626 CMP (SP) +, (SP)+ 
6357 032602 2$: 


6358 3 (BUT FDS1)+* $7634 


6360 032606 OOCDONE : 

032606 104412 RSE TUP 7:00 INITIALIZE THE FPS AND STACK; AND 
sSEE IF THE USER HAS EXPRESSED 
: THE DESIRE TO CHANGE THE SOF TWARE 
sVIRTUAL CONSOLE SWITCH REGISTER (HAS 


022602 104377 ERROR +377 
032604 000010 «WORD 10 
; THE USER TYPED CONTROL G?). 
| 


151 
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CKFPCCO FRPIIF FLTG PNT PRT C MACRO M1113. O09-APR=81 13:53 PAGE 60 SEQUENCE 152 
TEST # 63 = DESTINATION MODES, MODE 4 (FL=0), TEST 


6364 .SBTTL TEST # 63 = DESTINATION MODES, MODE 4 (FL=0), TEST 


PAPA ReEERESESRRRRSRSR SLES ESA RS RRS SERRA RRR SRA RR RRR RRR RRR RRR RRA S ERED SD 


T*TEST 63 DESTINATION MODES, MODE 4 (FL=0), TEST 


t* THIS IS A TEST OF DESTINATION MODE 4 USING 
-* THE STFPS INSTRUCTION 


*« 
TAP RARERRRPRRRRRR RRR RRR RRR RRR RRR RRR RR ESR RRR RRR RRR RRR RRR RRR DSS DS 


032610 000004 TST63: SCOPE 
6365 
6366 032612 PPC1: 

032612 104413 LPERR SET UP THE LOOP ON ERROR ADDRESS. 
6367 032614 012700 032712 MOV were 10. RO SET UP THE DATA BUFFER. 
6368 032620 012701 000006 MOV #6,R 
6369 032624 012720 177777 1$: MOV oi. (RO) 
6370 032630 077103 SOB 
6371 032632 012700 105555 MOV F105855.RO 
6372 032636 012737 032660 001236 MOV #PPC2,$TMP2 
6373 032644 012737 033012 000004 MOV #PPC25,ERRVECT ;SET UP FOR TRAPS TO VECTOR 4. 
6374 022652 170100 LDFPS RO “SET UP FPS. 
a 032654 012700 032720 MOV #PPCTB1+2,RO0 
6377 032660 170240 PPC2:  STFPS (RO) TEST INSTRUCTION. 
6378 032662 020027 032716 CMP RO, 4PPCTB1 1S RO CORRECT? 
6379 032666 001017 BNE PPC10 “BRANCH IF NOT CORRECT. 
6380 032670 023727 032716 105555 CMP PPCTB1,4105555 ;I1S THE RESULT CORRECT? 
6381 032676 001023 BNE PPC15 ‘BRAN ANCH IF NOT CORRECT. 
6382 032700 023727 032720 177777 CMP PPCTB14+2,#-1 :1S THE RESULT CORRECT? 
6383 032706 001030 BNE PPC20 :BRANCH IF NOT CORRECT. 
ouee 032710 000453 BR PPCDONE 
6386 :TEST DATA BUFFER: 
6387 032712 177777 177777 PPCTBO: .wORD <-1,-1 - 
6388 032716 177777 177777 177777 ~+PPCTB1: .WORD <-i.-1,-1,-1 
6390 zREPORT 2 INCORRECT. 
6391 032726 010037 001242 PPC10: RO, $TMP 
6392 032732 012737 032716 001240 mov #PPCTB1, —— 
6393 032740 1$: 

032740 104377 ERROR +377 

032742 000011 .~ WORD 11 
6394 7RO BAD (BUT 
639° 032744 000435 BR PPCDONE : FDST)X 
6397 REPORT RESULT INCORRECT. 
6398 032746 012737 105555 001240 PPC15: MOV #105555, $TMP3 . ST 634 
6399 032754 013737 032716 001242 MOV PPCTB1, $TMP4 
6400 032762 1$: 

032762 104377 ERROR +377 

032764 000012 .~ WORD 12 
6401 :BAD DATA 
6402 032766 000424 BR PPCDONE 
6403 
6404 
6405 REPORT RESULT INCORRECT. 
6406 032770 012737 177777 001240 PPCZ20: MOV #-1,$TMP 


mp3 
6407 032776 013737 032720 001242 MOV PPCTB1+2,$TMP4 


| 


| CKFPCCO FRTIF FLTG PNT PRT C 
TEST # 63 = DESTINATION MODES, MODE 4 (FL=0), TEST 


6408 033004 

033004 
" 033006 
6410 033010 


033012 


033022 
033026 


023036 


6426 033040 
033040 





104377 
000013 


000413 


011604 


000137 


011637 
022626 


104377 
000014 


104412 


032662 
047302 
001236 


K 12 
MACRO M1113 O9-APR=81 13:53 PAGE 60-1 SEQUENCE 153 


ERROR +377 
«WORD 13 

3 (BUT _GR7,FL) 
BR PPCDONE ; 57 TO 416 
Z INTO 417 


:1F A TRAP TO VECTOR 4 OCCURS COME HERE TO SEE IF THE TRAP OCCURRED 
[DURING EXECUTION OF THE FPP INSTRUCTION BEING TESTED, JF NOT GO 
[TO THE SPURIOUS TRAP TO 4 HANDLER. 

PPC25: MOV (SP) ,R4 


CMP R4,APPC2+2 

BEQ 1$ 

JMP CPSPUR 
1$: MOV (SP), ,$TMP2 - 

CMP (SP)+, (SP) + 
2$: 

ERROR +377 

. WORD 14 

; (BUT FDST)+ ST634 

PPCDONE : 

RSETUP :GO INITIALIZE THE FPS AND STACK; AND 


;SEE IF THE USER HAS EXPRESSED 

; THE DESIRE TO CHANGE THE SOFTWARE 
;VIRTUAL CONSOLE SWITCH REGISTER (HAS 
; THE USER TYPED CONTROL G?). 


L_12 
MACRO M1113 O9-APR=81 13:53 PAGE 61 SEQUENCE 154 


MODE 3 (FL=0), TEST 


“CKFPCCO FPIIF FLTG PNT PRT C 
TEST # 64 = DESTINATION MODES, 


6430 .SBTTL TEST # 64 = DESTINATION MODES, MODE 3 (FL=0), TEST 
5 ERARAAARRAARERERERERRARERRERARAREREARARRAARRRERERAAHEHRRARORAR ES 
| :*TEST 64 DESTINATION MODES, MODE 3 (FL=0), TEST 
j *“* 
:* THIS IS A TEST OF DESTINATION MODE 3 USING 
:* THE STFPS INSTRUCTION 
:  nbébneedanseseanasndeuaaeimaneenniaanabetineitiaaaiela 
—_ 033042 000004 15164: SCOPE 
6432 033044 QQC1: 
033044 104413 LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
6433 033046 012700 033150 MOV #00CTRO,RO >SET UP THE DATA BUFFER. 
6434 033052 012701 000010 MOV #10,R1 
6435 033056 012720 177777 1$: MOV #-1,(RO)+ 
6436 033062 077103 SOB R1,1$ 
6437 033064 012700 106653 MOV #106653,RO 
6438 033070 012737 033116 001236 MOV #00C2,$TMP2 
6439 033076 012737 033254 000004 MOV #00025, ERRVECT +e UP FOR TRAPS TO VECTOR 4. 
6440 023104 170100 LDFPS RO ET UP FPS. 
6441 033106 012700 033164 MOV #QQCTB2,RO 
Gene 033112 012710 033154 MOV #QQCTB1, (RO) 
6444 033116 170230 QQC2: STFPS 2 (RO)+ :TEST INSTRUCTION. 
6445 033120 020027 033166 CMP RO,AQQCTB2+2 :I1S RO CORRECT? 
6446 033124 001021 BNE aac =BRANCH IF NOT CORRECT. 
6447 033126 023727 033154 .106653 CMP QQCTB1,4106653 ;IS THE RESULT CORRECT? 
6448 033134 001025 BNE aac15 :BRANCH IF NOT CORRECT. 
6449 033136 023727 033164 033154 CMP QQCTA2,#QQCTR1 :IS THE RESULT CORRECT? 
6450 033144 001032 BNE Q0C20 “BRANCH IF NOT CORRECT. 
e031 033146 000455 BR QQCDONE 
6453 zTEST DATA BUFFER: 
6454 033150 177777 177777 QQCTBO: .WORD -i,-1 
6455 033154 177777 177777 #177777 QQCTB1: .WwORD <-1,-1,-1,-1 
S026 033164 177777 177777 QQCTB2: .WwORD -1,- 
6458 sREPORT RO INCORRECT. 
6459 033170 010037 001242 Q0C10: RO, 4 
6460 033174 012737 033166 001240 mov #00QCTB2+2,$TMP3 
6461 033202 1$: 
033202 104377 ERROR +377 
0332 000015 WORD 15 
6462 :RO BAD (BUT 
S465 033206 000435 BR QQCDONE : FDST)X 
6465 REPORT RESULT INCORRECT 
6466 033210 012737 106653 001240 Q0C15: MOV #106653, $TMP3 ST 634 
6467 033216 013737 033154 001242 MOV Soc TBI. $TMP4 
6468 033224 1$: 
033224 104377 ERROR +377 
033226 000016 .WORD 16 
6469 :BAD DATA 
6470 033230 000424 BR QQCDONE 
6471 
6472 
6473 REPORT RESULT INCORRECT. 


| CKFPCCO FRIIF FLTG PNT PRT C 


— - — - ee 


M 12 
MACRO M1113 O9-APR=81 13:53 PAGE 61-1 SEQUENCE 155 Cc 


TEST # 64 = DESTINATION MODES, MODE 3 (FL=0), TEST im 
| 
6474 033232 012737 033164 001240 QQC20: MOV #QQCTB2,$TMP3 ; (BUT FDST) | 
6475 033240 013737 033156 001242 MOV Q0CTR1+2,$TMP4 
6476 033246 . 
033246 104377 ERROR +377 
033250 000017 -WORD 17 
6477 033252 000413 BR QQCDONE 
6478 
6479 
6480 :I1F A TRAP TO VECTOR 4 OCCURS COME HERE TO SEE IF THE TRAP OCCURRED 
6481 * DURING EXECUTION OF THE FPP INSTRUCTION BEING TESTED, IF NOT GO 
6482 ;TC THE SPURIOUS TRAP TO 4 HANDLER. 
6483 033254 011604 aac2s: MOV (SP) ,R4 
6484 033256 020427 033120 CMP RZ, #OQC2+2 
6485 033262 001402 BEQ 1$ 
486 33264 000137 047302 JMP CPSPUR 
6488 033270 011637 001236 1$: MOV (SP) ,$TMP2 
6489 033274 022626 CMP (SP)+, (SP)+ 
6490 033276 2$: 
023276 104377 ERROR +377 
033300 000020 “WORD 20 
6491 ; (BUT FDST)+ ST634 
6492 
6493 033302 QQCDONE : 
033302 104412 RSETUP :G0 INITIALIZE THE FPS AND STACK; AND 
:SEE IF THE USER HAS EXPRESSED 
; THE DESIRE TO CHANGE THE SOF TWARE 
:VIRTUAL CONSOLE SWITCH REGISTER (HAS 
:T4— USER TYPED CONTROL G?). 
6494 
6495 


_ i tt 


“Age FP1IF FLTG PNT PRT C 


6497 


6527 033434 
6528 033440 
6529 033446 
033446 
033450 


6530 

6531 033452 

6532 

6535 

6534 033454 

6535 033462 

6536 033470 
033470 
033472 

6537 

6538 033474 

6539 

6540 


000004 


104413 


012760 
170250 


177777 
177777 
177777 


010037 
012737 


104377 
000021 


000435 
012737 
013737 


104377 
000022 


000424 


033414 
000006 
177777 


004301 
033362 
033520 
033432 
033420 
033430 
033420 


033430 


177777 
177777 
177777 


001242 
033430 


004301 
033420 


MACRO M1 
ST # 65 = DESTINATION MODES, MODE 5 (F 


001236 
000904 


177776 


004301 
033420 


177777 


001240 


001240 
001242 


N 12 
113 of ae 13:53 PAGE 62 SEQUENCE 156 


L=0), 
-SBTTL TEST # 65 = DESTINATION MODES, MODE 5 (FL=0), TEST 


FLARE REE EERE REE EEE RRR EERE REE EERE RRR EEE 


:*TEST 65 DESTINATION MODES, MODE 5 (FL=0), TEST 


:* THIS IS A TEST OF DESTINATION MODE 5 USING 
;* THE STFPS INSTRUCTION 
-* 


WEA AASEREERERAARRRRARRRRARRRASARRS RRR SE SERS ARSE SRS RSS RRR RSS ES SS | 


1$165: SCOPE 


RRC1: 
LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
MOV #RRCTBO,RO SET UP THE DATA BUFFER. 
MOV #6,R1 
1$: MOV #-1,(RO)+ 
SOB R1, 
MOV #004301,R0 


MOV ARRC2,$TMP2 
MOV en es: 


MOV #RRCTB2+2,RO 
MOV #RRCTB1,=2 (RO) 


RRC2: STFPS = a=<(RO) 
CMP RO,ARRCTB2 


;SET UP pha TRAPS TO VECTOR 4. 
;SET UP FPS. 


r- 
=) 
nn 
Uv 
nn 
D 


i: TEST INSTRUCTION. 
31S RO CORRECT? 


BNE RRC10 :BRANCH IF NOT CORRECT. 
CMP RRCTB1,4004301 ;1S THE RESULT CORRECT? 
BNE RRC15 [BRANCH IF NOT CORRECT. 
CMP RRCTB2,ARRCTB1 ;1S THE RESULT CORRECT? 
BNE RRC20 [BRANCH IF NOT CORRECT. 
BR RRCDONE 

3; TEST DATA BUFFER: 

RRCTBO: .WwORD -1,-1 


RRCTB1: .WORD <-1,-1,-1,-1 
RRCTB2: .WORD <-1,-1 


St ~ INCORRECT. 
C10: -STMPS 
MOV #RRCTB2, $TMP3 


1$: 
ERROR +377 
-WORD 21 
;RO BAD (BUT 
BR RRCDONE s FDST)&X a 
;REPORT RESULT INCORRECT. 
RRC15: MOV #004301, $TMP3 : ST 634 
- MOV RRCTB1,$1TMP4 
ERROR +377 
-WORD 22 
;BAD DATA 
BR RRCDONE 


B 13 
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| TEST # 65 = DESTINATION MODES, MODE 5 (FL=0), TEST 


6541 ;REPORT RESULT INCORRECT. 

6542 033476 012737 033430 001240 ARC20: MOV — #RRCTB2, $TMP3 :BUT FDST) | 
6543 033504 013737 033422 001242 MoV —-RRCTB1+2, STMP4 , S 
6544 033512 18: 
| 033512 104377 ERROR +377 

033514 000023 -WORD 28 
| 6545 ; (BUT _GR7,FL) 

6546 033516 000413 BR RRCDONE [ST 357 10 416 

6947 ZINTO 417 , 

6549 :I1F A TRAP_TO VECTOR 4 OCCURS COME HERE TO SEE IF THE TRAP OCCURRED 

6550 DURING EXECUTION OF THE FPP INSTRUCTION BEING TESTED, IF NOT GO 

6551 ;TO_THE SPURIOUS TRAP TO 4 HANDLER. 

6552 033520 011604 RRC25: MOV (SP) ,R4 

6553 033522 020427 033364 CMP RG ARRC2+2 

6554 033526 001402 BEQ.s18 , 

6995 033530 000137 047302 JMP CPSPUR ’ 

6557 033534 011637 001236 1$: MOV (SP) ,STMP2 

6558 033540 022626 (MP (SP) +, (SP) + 

6559 033542 2s: 

033542 104377 ERROR +377 
033544 000024 -WORD 24 

6560 3 (BUT FDST)+ ST634 

6561 

6562 033546 RRCDONE : 

033546 104412 RSE TUP :GO_ INITIALIZE THE FPS AND STACK; AND 


;SEE IF THE USER HAS EXPRESSED 

;THE DESIRE TO CHANGE THE SOF TWARE 
;VIRTUAL CONSOLE SWITCH REGISTER (HAS 
;THE USER TYPED CONTROL G?). 





—y 


% 
| 


CKFPCCO FPITIF FLTG PNT PRT C 


C_13 
MACRO M1113 O9=APR-81 13:53 PAGE 63 SEQUENCE 


T # 66 = DESTINATION MODES, MODE 6 (FL=0), TEST 


6565 


033550 


6568 033552 


6592 033664 
6593 033670 


6596 033700 


033716 


6606 
6607 033740 
6608 


000004 


104415 


012700 
170260 


177777 
177777 


010067 
012767 


104377 
000025 


000440 
012767 
016767 


104377 
000026 


000427 





033664 
000006 
177777 
102514 
033622 
033764 
026467 


005201 
000000 


026467 
000022 
000014 


177777 


177777 


145336 
026467 


102534 
177736 


102514 
177777 


177777 


145326 


-SBTTL TEST # 66 = DESTINATION MODES, MODE 6 (FL=0), TEST 


CIOS ISIUIIISIUIIISISISIIIOIIIIIISIUISIOIS IO IDOI ISIIOIDIDIDINISIOIISIOIIOIDIIOIOIO 
:*TEST 66 DESTINATION MODES, MODE 6 (FL=0), TEST 

;* THIS IS A TEST OF DESTINATION MODE 6 USING 

;* THE STFPS INSTRUCTION 


+8166: SCOPE 


DSABL AMA DISABLE MODE 6 TO MODE 3 CONVERSIONS 
SSC1 
LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
MOV #SSCTBO,RO SET UP THE DATA BUFFER. 
MOV #6,R1 
1$: MOV #~-1,(RO)+ 
SOB R1,1 
MOV #102514,R0 
MOV #SSC2,$TMP2 
MOV MSSC25,ERRVECT ;SET UP FOR TRAPS TO VECTOR 4. 
LDFPS = RO sSET UP FPS. 
CLR R1 
MOV #SSCTB1-5201,R0 
SSC2: STFPS 5201(RO) ;TEST INSTRUCTION. 
CMP R1,40 :WAS PC CORRECT AFTER EXECUTION? 
BNE SSC30 [BRANCH IF NOT CORRECT. 
CMP RO,ASSCTB1-5201 iS RO CORRECT? 
BNE SSC10 ;BRANCH IF NOT CORRECT. 
CMP SSCTB1,4102514 1S THE RESULT CORRECT? 
BNE SSC15 BRANCH IF NOT CORRECT. 
CMP SSCTB1+2,4-1 18 THE RESULT CORRECT? 
BNE $SC20 ;BRANCH IF NOT CORRECT. 
BR SSCDONE 


; TEST DATA BUFFER: 
SSCTBO: .WORD <-1,-1 
SSCTB1: .WORD -1,-1,-1,°1 
;REPORT oe INCORRECT. 
$SC10: RC, $TMP4 
MOV #SSCTB1-5201,$TMP3 


1$: 
ERROR +377 
. WORD 25 
3:RO BAD 
BR SSCDONE 
:REPORT RESULT eerie 
SSC715: MOV #102534, $TMP3 
" MOV SSCTB1, $TMP4 
ERROR +377 
. WORD 26 
;BAD DATA 
BR SSCDONE 


158 


CKFPCCO FPIIF FLTG PNT PRT C 
TEST # 66 = DESTINATION MODES, MODE 6 (FL=0), TEST 


6611 033742 
033760 


4 
+ FA 033762 


oS) 033764 


| 
| 
| 
| 034010 
6629 
6630 034012 
6633 034014 
6634 034014 
034014 
034016 


6639 034020 
034020 


6640 
6641 


012767 
016767 


104377 
000027 


000416 


000167 
011667 


0226<6 
104377 
000030 
000402 


104377 
000031 


104412 


177777 
177716 


033624 
013302 
145232 


D_13 
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145270 
145264 


REPORT RESULT INCORRECT. 
SSC20: MOV #-1,$1TMP 
MOV SSCTB1+2,$TMP4 
ERROR +%77 


1$: 


"(BUT GR7,FL) 
BR SSCDONE :ST 357 TO 416 
;INTO 417 


31F A TRAP TO VECTOR 4 OCCURS COME HERE TO SEE IF THE TRAP OCCURRED 
;DURING EXECUTION OF THE FPP INSTRUCTION BEING TESTED, IF NOT GO 
3TO_THE SPURIOUS TRAP TO 4 HANDLER. 


SSC25: MOV (SP) ,R4S 
CMP R4,ASSC2+2 
B5Q i$ 
JMP CPSPUR 
1$: MOV (SP) ,STMP2 
CMP (SP)+,(SP)+ 
2s: 
ERROR +377 
.~ WORD 30 
: (BUT FDST)+ ST634 
BR SSCDONE 
;REPORT PC NOT INCREMENTED BY 2 DURING EXECUTION. 
SSC 30: 
1$: 
ERROR +377 
. WORD 31 
sPC NOT 
y INCREMENTED 
:BY 2 
SSCDONE : 
RSETUP 3GO INITIALIZE THE FPS AND STACK; AND 


;SEE IF THE USER HAS EXPRESSED 
THE DESIRE TO CHANGE THE SOFTWARE 
:VIRTUAL CONSOLE SWITCH REGISTER (HAS 
;THE USER TYPED CONTROL G?). 

-ENABL AMA RESET MODE 6 TO MODE 3 CONVERSIONS 


CKFPCCO FRTIF FLTG PNT PRT C 


TES’ # 67 = DESTINATION MODES, 


6642 


6666 034142 


034144 
034150 
034160 


034164 


034220 
034222 


612760 
170270 


000460 


177777 
177777 
177777 


010037 
012737 


104377 
000032 


000440 


034144 
000010 
177777 


103747 


034102 
034250 


026757 
034150 


005201 
000000 


026757 
034150 
034152 


177777 
177777 
177777 


001242 
026757 


103747 
034150 


E 13 
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MODE 7 


001236 
000004 


005201 


103747 
177777 


177777 


001240 


001240 
001242 


(FL=0), TEST 
.SBTTL TEST # 67 = DESTINATION MODES, MODE 7 (FL=0), TEST 


3 PRR EPSSSASESZASLESES ESSERE RAR SSR SR ARS RRR SRR RRR RRR RRR RRR RSE RROD BS 


gees! 67 DESTINATION MODES, MODE 7 (FL=0), TEST 


;* THIS IS A TEST OF DESTINATION MODE 7 USING 
b* THE STFPS INSTRUCTION 


-f 
RRR REE EERE EAE EKER AREER ERARERERERARARAREE ED 


1ST67: SCOPE 


TTCVe 
LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
MOV #TTCTBO,RO :SET UP THE DATA BUFFER. 
MOV #10,R1 
1$: MOV #-1,(RO)+ 
SOB R1,1$ 
MOV #103747,R0 
MOV ATTC2,$TMP2 
MOV #TTC25,ERRVECT ;SET UP FOR TRAPS TO VECTOR 4. 
_* ~ sSET UP FPS. 
L 


MOV #TTCTB2-5201,RO 
MOV #TTCTB1,5201(RO) 


TIC: STFPS  @5201(RO) ; TEST INSTRUCTION. 


CMP #0,R1 ;WAS PC CORRECT AFTER m cepts pene 
BNE TTC30 [BRANCH IF NOT CORRECT. 

CMP RO,ATTCTB2-5201 iS RO CORRECT? 

BNE TTC10 BRANCH IF NOT CORRECT. 

CMP TTCTB1 4103747 1S THE RESULT CORRECT? 

BNE TTC15 :BRANCH IF NOT CORRECT. 

CMP TICTB1+2,4-1 ;18 THE RESULT CORRECT? 

BNE TTC20 ;BRANCH IF NOT CORRECT. 

BR T1 CDONE 


; TEST DATA BUFFER: 

TTCTBO: .WORD <-1,-1 
TTCTB1: WORD <=-1,-1,-1,-1 
TTCTB2: .WwORD <-1,-1 


a i -< INCORRECT. 
TC10: RO,$TMP 
MOV BT TC TB2- 5201, $TMP3 


1$: 
ERROR +377 
. WORD 32 
:RO BAD 
BR TTCDONE 
:REPORT RESULT INCORRECT. 
TTC15: MOV #103747, $TMP3 
s MOV TTCTB1,$IMP4 
ERROR +377 
“WORD 33 


BAD DATA 


= 


-—_---_—_—- 


Te FPTIF FLTG PNT PRT C 


1 # 67 = DESTINATION MODES, MODE 7 


034224 


000427 


012737 
013737 


104377 
0000 34 


000416 


011604 


022626 


104377 
000035 


000402 


104377 
000036 


104412 


177777 001240 
034152 001242 


034104 


047302 
001236 


F 13 
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(FL=0), TEST 
BR TTCDONE 
sREPORT RESULT eget 
TTC20: MOV MP 
i. MOV Trctelee, $TMP4 
bg ERROR +377 
~ WORD 34 
; (BUT GR7,FL) 
BR TTCDONE “ST 357 TO 416 
sINTO 417 


IF A TRAP TO VECTOR 4 OCCURS COMF HERE TO SEE IF THE TRAP OCCURRED 


DURING 
370 THE 
T1025: 


1$: 


TTCDONE : 


EXECUTION OF THE FPP INSTRUCTION BEING TESTED, IF NOT GO 


SPURIOUS TRAP. T TO 4 HANDLER. 
CMP RS Paric2+2 
BEQ 1$ 
JMP CPSPUR 
MOV (SP) ,$TMP2 
CMP (SP)+, (SP) + 
ERROR +377 
“WORD 35 
: (BUT FSDT)+ ST634 
BR TTCDONE 
PC NOT INCREMENTED BY 2 DURING EXECUTION. 
ERROR +377 
~ WORD 36 
sPC NOT 
* INCREMENTED 
RSE TUP :GO INITIALIZE THE FPS AND STACK: AND 


;SEE IF THE USER HAS EXPRESSED 

THE DESIRE TO CHANGE THE SOF TWARE 
VIRTUAL CONSOLE SWITCH REGISTER (HAS 
THE USER TYPED CONTROL G?). 


161 


an 


—— 


CKFPCCO FRIIF FLTG PNT PRT C 


TEST @ 70 = DESTINATION MODES 


6725 


6769 


034340 


034342 
034346 


034 366 


034370 
034400 
034402 


034410 
034410 


175420 
020027 
001420 
010037 
012737 


104377 
000037 


000410 
000000 
177777 
177777 


104412 


000300 
034370 


- 034340 


034402 


034406 


001242 


034406 


000000 
177777 


G 13 
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001236 


001240 


000000 
177777 


, MODE 2 (FL=1), TEST 


.SBTTL TEST # 70 = DESTINATION MODES, MODE 2 (FL=1), TEST 


ERE ERR REREE 


S*TEST 70 DESTINATION MOD 


;* 2 USING STCOL WITH REGISTER 


1$T70: SCOPE 
UU . 


LPERR 

MOV #300,R0 
LDFPS R 

MOV AMUUCTP1 RO 
LDD (RO) ,ACO 
MOV MUUC?2 ,STMP2 


MOV AMUUCBF 0 ,RO 
yuc2: STCDL ACO,(RO)+ 


CMP RO ,AUUCBF O0+4 
BEQ UUCDONE 


zsREPORT RO INCORRECT. 
MOV 


(uC3: RO, $TMP4 
s. MOV #UUCBF 0+4,$TMP3 
ERROR +377 
“WORD 37 


BR UUCDONE 
;TEST DATA BUFFER: 
UUCTP1: * tes 0,0.0,0 


UUCBFO: .WORD <=-1,-1,-1 


UUCDONE : 
RSE TUP 


TARR RS SARRSSSSSER SR RR RAR SR RA ARRAS SD BS 


ES, MODE 2 (FL=1), TEST 


3* THIS iS A TEST OF DESTINATION MODE 


0 


;SET UP THE LOOP ON ERROR ADDRESS. 
sSET UP FPS. 


SET UP THE ACO OPERAND. 


3 TEST INSTRUCTION. 


31S RO CORRECT? 
;BRANCH IF CORRECT. 


;RO NOT INCR BY 4 


:GO INITIALIZE THE FPS AND STACK; AND 
7SEE IF THE USER HAS EXPRESSED 

3 THE DESIRE TO CHANGE THE SOF TWARE 
:VIRTUAL CONSOLE SWITCH REGISTER (HAS 
3 THE USER TYPED CONTROL G?). 


SEQUENCE 


162 





H 13 
CKFPCCO FRIIF FLTG PNT PRT ( to M1113 O9=APR=81 13:53 PAGE 66 SEQUENCE 
TES? @ 7) = DESTINATION MODES, MODE 4 (FL=1), TEST 


6756 .SBTTL TEST # 71 = DESTINATION MODES, MODE 4 (FL=1), TEST 
VEAP aoe RRR RR RRR RRR RRR RRR RRR RRR RR RRR RRR RRR RR RR RRR RR RR RASA SESS ED SO | 


:STesT 71 DESTINATION MODES, MODE 4 (FL=1), TEST 


tS THIS IS A TEST OF DESTINATION MODE 
;* 4 USING STCDL WITH REGISTER 0 


BEARER RRR RRRRRERR RRR RRRR RRR RRR RRR RRR RR RRR RRRRR RRR RR RSA SAR ASSES S| 


6757 034412 000004 1ST71: SCOPE 
6758 024414 vVC1: 
: 034414 1064613 LPERR SET UP THE LOOP ON ERROR ADDRESS. 
6759 034416 012700 000300 MOV #300,R0 ;SET UP FPS. 
6760 034422 170100 LDFPS R 
6761 0344246 012700 034474 MOV #VVCTP1,RO 3SET UP THE ACO OPERAND. 
6762 034430 172410 LDD (RO? ,ACO 
6763 034432 012737 034444 001236 MOV #VVCc,$TMP2 
one 034440 012700 034512 MOV #VVCBFO+4,RO 
ons 024444 175440 vvC2: STCDL ACO,=-(RO) sTEST INSTRUCTION. 
6768 034446 020027 034506 CMP RO, A#VVCBFO 31S RO CORRECT? 
os 034452 001420 BEQ VVCDONE 
6771 “REPORT RO INCORRECT. 
6772 034454 010037 001242 vvC3: MOV RO.$TMP 
6773 034460 012737 034506 001240 MOV BVWCBFO. $STMPS 
6774 034466 1$: 
034466 104377 ERROR +377 
034470 000040 «WORD 40 
6775 RO NOT DECR BY 4 
6776 034472 000410 BR VVCDONE 
6777 ;TEST DATA BUFFER: 


6778 034474 000000 000000 000000 vvCTP!: Sta 0.0.0.0 
6779 034504 177777 
6780 034506 177777 177777 177777 vvCBFO: i -1,-1,-1 


6782 034514 VVCDONE : 
034514 104412 RSETUP 


:GO INITIALIZE THE FPS AND STACK; AND 
;SEE IF THE USER HAS EXPRESSED 

7 THE DESIRE TO CHANGE THE SOF TWARE 
sVIRTUAL CONSOLE SWITCH REGISTER (HAS 
3 THE USER TYPED CONTROL G?). 
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r — 


ee FPTIF FLTG PNT PRT C 


T @ 72 = STCDI AND STCDL TEST 


6793 


034516 000004 
| 6794 


5 
6796 034520 
034520 104413 


034564 104413 


8 8 

ro o 
NO oo 

° 

rs 

we 

R 

3S 

= 

Ww 


0 
6835 034662 140705 


035666 
000000 
000000 
177777 


035666 


177777 


035666 
075757 
173757 
004021 


1_13 
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000000 


000000 


157737 


.SBTTL TEST # 72 = STCDI AND STCDL TEST 


SF RAAAAAAAAAAAAAAEAAARAARAERAAARARARARARARAIORARARRARRAREREEAREREATEREEED 
s*TEST 72 STCDI AND STCDL TEST 

:* THIS IS A TEST OF THE STCDI AND 

:* STCDL INSTRUCTIONS. NOTE THAT A 

:* SUBROUTINE, STCSUB, IS USED TO 

t* SET UP THE OPERANDS, EXECUTE THE STC 

‘* INSTRUCTION AND CHECK THE RESULT. 

¥ MOAR ARASRSASAASAR AAA RR RRS R SSR RR RR RRR RRR RRR RRR RRR RR RR RR RRR RSS ESSE SS 


1$172: SCOPE 
sFIRST TEST STC WITH EXP=100 (EXCESS 200) 
WwWCl: 


LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
JSR PC, STCSUB 7GO EXECUTE THE INSTRUCTION. 
1$ .WORD  20000,0,0,0 ‘ACO OPERAND. 
2$: “wORD 0,0 TEXPECTED RESULT. 
3$: “WORD =1,-1 ‘ERROR RES. 
i$: 40300 [FPS BEFORE EXECUTION. 
40304 “FPS AFTER EXECUTION. 
140304 TANTICIPATED ERRONEOUS FPS. 
ef : REPORT RESULT INCORRECT. 
S$: ERROR +322 RESULT INCORP 
BR 6$ 
ERROR +325 EITHER (BUT FLAG) 
6$: :ST 662 
[OR CLEAR FLAG 
2ST 774 
sEXP=0 (OCT)  FL=1 FIC=0 
WwWC2: 
LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
JSR PC, STCSUB “GO EXECUTE THE INSTRUCTION. 
1$: -WORD  40000,0,0.0 ZAC :ACO OP ERAND. 
2$: “WORD 0,0 SEXPECTED RESUL 
3$: “WORD =1,-1 s ANTICIPATED ERRONEOUS RESULT. 
4g: 40313 [FPS BEFORE EXECUTION. 
40304 ‘FPS AFTER EXECUTION. 
140304 ANTICIPATED ERRONEOUS FPS. 
-1 sEXPECTED FEC. 
5$: ERROR $322 :REPORT RESULT INCORRECT. 
a ERROR +326 ;REPORT FPS INCORRECT. 
ZEXP=37 (OCT)  FL=1 FIC=1 
WWC4: 
LPERR SET UP THE LOOP ON ERROR ADDRESS. 
JSR PC,STC O EXECUTE THE INSTRUCTION. 
1$: . WORD 6667. 73757 am 167773 :ACO OPERAND. 
2$: WORD  55675.173757 ; EXPECTED RESULT. 
3$: “WORD 122102,004021 ANTICIPATED ERRONEOUS RESULT. 
43: 40717 sFPS BEFORE EXECUTION. 
40700 sFPS AFTER EXECUTION, 


140705 ANTICIPATED ERRONEOUS FPS, 


CKFPCCO_FPTIF FLTG PNT PRT C 


TEST # 72 = STCDI AND STCDL TEST 


6836 034664 
6837 034666 
6838 


034674 


6854 024736 
ps 2 | 034740 


8 
6859 034740 


5046 
6886 035050 


6889 035050 


177777 


104330 


104413 
004737 


104331 


104413 
004737 
046000 


000401 
104323 


035666 


177777 


035666 


0 
177777 


035666 


177777 


MACRO M1113 


000000 


000000 


000000 


5$: 


6$: 


O9-APR=81 13:53 


1 
ERROR 
BR 
ERROR 


(OCT) 


+327 
6$ 
+326 


FL=1 


J_13 
PAGE 67=1 


EXPECTED FEC. 


FIC=1 


PC,STCSUB 


50000,0, 


-1,°1 


ot ad 
$330 


FL=1 
PC,STCSUB 


50000,0, 
0,0 
-i,-1 


0,0 


3 (BUT ENBT) ST 632 
;REPORT FPS INCORRECT. 


;SET UP THE LOOP ON ERROR ADDRESS. 


:GO pus THE INSTRUCTION. 
[ACO OPERAN 
EXPECTED RESULT. 


SANTICIPATED ERRONEOUS RESULT. 
FPS BEFORE EXECUTION. 
sFPS AFTER EXECUTION. 


sANTICIPATED ERRONEOUS FPS. 


sEXPECTED FEC. 


FIC=0 


0,0 


EXPECTED 


FIC=1 


PC, STCSUB 
46600.1.0,0 


REPORT RESULT INCORRECT. 


; (BUT FIC) ST 004 


:T0 305 INTO 
3315 


;SET UP THE LOOP ON ERROR ADDRESS. 


3GO EXECUTE THE INSTRUCTION. 
ZACO OPERAND. 
sEXPECTED RESULT. 


SANTICIPATED ERRONEOUS RESULT. 


FPS BEFORE bay hogs 
3FPS AFTER EXECUTION. 
ZANTICIPATED ERRONEOUS FPS. 


FEC 
;REPORT RESULT INCORRECT. 


(BUT FIC) ST 004 T 
3315 INTO 305 


;SET UP THE LOOP ON ERROR ADDRESS. 
3GO EXECUTE THE INSTRUCTION. 


3ACQ OPERAND. 

sEXPECTED RESUL 

SANTICIPATED ERRONEOUS RESULT. 
FPS BEFORE EXECUTION. 


SFPS AFTER EXECUTION. 
ANTICIPATED ERRONEOUS FPS. 


EXPECTED FEC 


FICc=1 


;REPORT RESULT INCORRECT. 
:REPORT FPS INCORRECT. 


SEQUENCE 


165 


;REPORT FPS INCORRECT. 


CKFPCCO FRIIF FLTG PNT PRT C 
TEST # 72 = STCDI AND STCDL TEST 


035050 104412 

6890 035052 
6891 035056 
35066 


6892 035 
6893 035072 
6894 


000000 


S 


177777 


035666 
000000 
177777 

177777 


000000 


000401 
104333 
6916 035160 


6919 035160 
104413 
004737 035666 


000000 


oes 035224 


3 
6934 rn 035904 


035666 
000000 
177777 
000000 


000000 


177777 


6942 035260 





1$: 
es: 
3$: 
4$: 


K_13 
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(OCT), 


SEQUENCE 166 


;SET UP THE LOOP ON ERROR ADDRESS. 
3GO EXECUTE THE INSTRUCTION. 


45600,1,0.0 z:ACO OPERAND. 
100,0 SEXPECTED RESUL 
-1,°1 s ANTICIPATED YE RONEOUS RESULT. 


FPS BEFORE EXECUTION. 

SFPS AT TER EXECUTION. 

;ANTICIPATED ERRONEOUS FPS. 
sEXPECTED FEC. 


i ;REPORT RESULT INCORRECT. 
+323 ;REPORT FPS INCORRECT. 
FL=0 FIC=1 
;SET UP THE LOOP ON ERROR ADDRESS. 
PC,STCSUB 7GO EXECUTE THE INSTRUCTION. 
43600.0,0,0 [ACO OPERAND. 
40000,-1 ;EXPECTED RESULT. 
0,-1 ;ANTICIPATED ERRONEOUS RESULT. 


FPS BEFORE EXECUTION. 
[FPS AFTER EXECUTION. 
sANTICIPATED ERRONEOUS FPS. 
sEXPECTED FEC. 
+t ;BAD CONSTANT ST 066 


+333 ;REPORT FPS INCORRECT. 
FL=0— FIC=1 

;SET UP THE LOOP ON ERROR ADDRESS. 
PC, STCSUB [GO EXECUTE THE INSTRUCTION. 
44000,0,0,0 [ACO OPERAND. 
0,-1 SEXPECTED RESULT 


-1,°1 ANTICIPATED ERRONEOUS RESULT. 
FPS BEFORE oy Se 

ZFPS AFTER EXECU UTION. - 

ZANT ICIPATED ERRONEOUS FPS. 
sEXPECTED FEC. 
one REPORT RESULT INCORRECT. 


6 
+334 ;BAD CONSTANT ST 066 


AC NEGATIVE, FL=0, FIC=1 
;SET UP THE LOOP ON ERROR ADDRESS. 


PC,STCSUB 3GO EXECUTE THE INSTRUCTION. 


142000. 0, 0.0  :ACO OPERAND. 
177600.- sEXPECTED RESULT. 
+00" 0 :ANTICIPATED ERRONEOUS RESULT. 


FPS BEFORE cme CH ieee 

SFPS AFTER EXECUTION. 

SANTICIPATED ERRONEOUS FPS, 
SEXPECTED FEC. 


an 


L 13 
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TEST # 72 = STCDI AND STCDL TEST 


6943 035262 104335 S$: ERROR +335 =; (BUT ENBT) ST 632 
6944 035264 000401 BR 6$ 
6945 035266 104336 ERROR +336 ;(SET FN) ST 473 
6946 035270 6$: 
6947 
6948 sEXP=37 (OCT), FL=1, FIC=1, AC NEG. 
6949 035270 WwC12: 
} 035270 104413 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
6950 035272 004737 035666 JSR PC,STCSUB :GO EXECUTE THE INSTRUCTION. 
6951 035276 147600 000000 000000 1$: “WORD 147600,0,0,0  :ACO OPERAND. 
| 6952 035306 140000 000000 2$: “WORD  140000.0 sEXPECTED RESULT. 
| 6953 035312 137777 000000 3$: “WORD 137777.0 ANTICIPATED ERRONEOUS RESULT. 
| = 954 035316 040700 L$: 40700 :FPS BEFORE EXECUTION. 
6955 035320 040710 40710 sFPS AFTER EXECUTION. 
6956 035322 177777 oj SANTICIPATED ERRONEOUS FPS. 
6957 035324 177777 -1 EXPECTED FEC. 
6958 035326 104337 5$: ERROR +337 : (BUT COUT) ST 375 
| 6959 035330 000401 BR 6$ ist re TO 074 
| 6960 035332 104323 ERROR +323 0 274 
6961 025334 6$: 
6962 
6963 sExP=37 (OCT), FlLe=T, FIC=1, AC NEG 
6964 035334 WwwCi3: 
035334 104413 LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
6965 035336 004737 035666 JSR PC,STCSUB :60 ge THE INSTRUCTION. 
6966 035342 147600 000000 001000 1S: “WORD 14 5800. 0 1000. 0 :ACO OPER 
6967 035352 137777 177777 2$: ~ WORD 1S/7l is 17777 PEMPECTED RESUL 
6968 035356 140000 177777 3$: ~ WORD 140000, Ea aaes ‘ANT ICIPATED linet RESULT. 
6969 035362 040707 4$: 40707 FPS BEFORE EXECUTION 
6970 035364 040710 40710 sFPS AFTER EXECUTION. 
6971 035366 177777 -1 sANTICIPATED ERRONEOUS FPS. 
6972 035370 177777 -1 sEXPECTED FEC. 
6973 035372 104340 5$: ERROR +340 : (BUT COUT) ST 375 
6974 035374 000401 BR 6$ :TO 274 INTO 074 
6975 035376 104323 ERROR +323 sREPORT FPS INCORRECT. 
6976 035400 6$ 
6977 
6978 sEXP=41 (OCT), AC NEG, FL=1, FIC=1 
6979 035400 WwwWC14: 
035400 104413 LPERR : SET UP THE LOOP ON ERROR ADDRESS. 
6980 035402 004737 035666 JSR PC,STCSUB GO EXECUTE THE INSTRUCTION. 
6981 035406 150200 000000 000000 1%: “WORD 150200,0,0,0  :ACO OPERAND. 
6982 035416 000000 000000 2$: “WORD (,0 : EXPECTED RESULT. 
6983 035422 177777 177777 3$: .~ WORD -1,-1 ANTICIPATED ERRONEOUS RESULT. 
6984 035426 040700 4$: 40700 eps BEFORE EXECUTION. 
6985 035430 140705 140705 ZFS AFTER EXECUTION. 
6986 035432 177777 -1 ANTICIPATED ERRONEOUS FPS. 
6987 035434 000006 6 S EXPECTED FEC. 
6988 035436 104322 5$: ERROR +322 sREPORT RESULT INCORRECT. 
6989 035440 000401 BR 3 
990 035442 104341 ERROR +341 : (BUT EZBT) ST 377 
6991 035444 6$: 
6992 sEXP=40 (OCT), AC NEG, FL=1, FIC=1 
6993 03544:; WwC15: 
035444 104413 LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
6994 035446 004737 035666 JSR PC,STCSUB :GO EXECUTE THE INSTRUCTION. 
6995 035452 150000 000001 000000 1$: “WORD 150000,1,0,0  :ACO OPERAND. 





tf ee 


cE: 
| 
| 
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ST # 72 = STCDI AND STCDL TEST 


6996 035462 


7002 035502 
7003 035504 
7004 035506 
7005 035510 
7006 


7007 
7008 035510 
510 


7015 035542 
7016 035544 


7025 035554 

035554 
7026 035556 
7027 035562 
7028 035572 
702 5576 


7037 035620 
38 


7041 035620 


7045 035642 
7046 035646 
7047 035650 
7048 035652 
7049 035654 


000401 
104323 


104413 
004737 


104323 


104413 


000401 
104323 


104413 


177777 


000000 
177600 


035666 
000000 
000000 
000000 


035666 


000000 


035666 
ata 
177777 
177400 
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000000 


000000 


000000 


sEXPECTED F 


EXPECTED 


SEQUENCE 168 


sEXPECTED RESULT. 


;ANTICIPATED ERRONEOUS RESULT. 
FPS BEFORE Sy agg 
SFPS AFTER EXECUTION. 
ANTICIPATED ERRONEOUS FPS. 


;(BUT COUT) ST 360 
[TO 654 INTO 454 


SREPORT FPS INCORRECT. 


;SET UP THE LOOP ON ERROR ADDRESS. 


:GO gota THE INSTRUCTION. 
;ACO OPERAND. 

EXPECTED RESULT. 

SANTICIPATED ERRONEOUS RESULT. 
FPS BEFORE toy Ay 4 Ag 

SFPS AFTER EXECUT 

ZANT ICIPATED ERRONEOUS FPS. 


FEC 
;REPORT RESULT INCORRECT. 


REPORT FPS INCORRECT. 


FL=1 


;SET UP THE LOOP ON ERROR ADDRESS. 
:GO go gee INSTRUCTION. 


ACO OPERAN 
EXPECTED RESULT. 
:ANTICIPATED ERRONEOUS RESULT. 
S BEFORE EXECUTION. 
iFPS artéR. EXECUTION. 
[ANTICIPATED ERRONEOUS FPS. 


sEXPECTED FEC. 


7 (BUT NBIT) ST 654 
;OR (BUT COUT) ST 454 
REPORT FPS INCORRECT. 


FL=0, FIC=1 


SET UP THE LOOP ON ERROR ADDRESS. 
=60 nt ila INSTRUCTION. 


sEXPECTED RESULT. 

:ANTICIPATED ERRONEOUS RESULT. 
FPS BEFORE ty SA LE ge 
SFPS AFTER EXECU 


[ACO OPERAN 


2$: WORD 0,0 
3$: “WORD  100000,-200 
4$: 0700 

140705 

dees 
5$: ERROR +342 

R 6$ 

ERROR +323 
6$: 
sEXP=40, AC NEGATIVE, FL=1, FIC=1 
WwWC16: 

LPER 

JSR PC,STCSUB 
1$: -WORD 150001,0,0,0 
2$: -WORD 0,0 
3$: “WORD  77400,0 
4$: 40700 

140705 
5$: ERROR +343 

BR 6$ 

ERROR +323 
6$: 
ay ” (OCT), AC MOST NEG LONG INT, 
sFIC= 
WwWC17: 

LPERR 

JSR PC,STCSUB 
1$: -WORD 150000,0,0,0 
2$: -WORD 100000,0 
3$: . WORD 0.0 
4$: 40700 

40710 

140705 
5$: ERROR + 

BR 6$ 

ERROR +323 
6$: 
:EXP=20, AC = MOST NEG INTEGER, 
wwWC18: 

LPERR 

JSR PC,STCSUB 
1$: -WORD 144000,1,0,0 
2s: -WORD 100000,-1 
3$: «WORD 100000,177400 
43: 40600 

40610 

140605 


TION. 
SANTICIPATED ERRONEOUS FPS. 


sEXPECTED FEC. 





— 


“ CKFPCCO FP11F FLTG PNT PRT C 


7050 035656 
7051 035660 
aire 035662 


053 
7054 035664 
7055 


7088 035666 
7089 035670 


7093 035702 
7094 035706 
7095 035712 


7096 035716 
7097 035720 


7101 035740 
7102 

7103 035742 
7104 035744 


7105 035746 
7106 035750 


104345 

00401 
104323 
000534 


So 


175410 
170204 


TEST # 72 = STCDI AND STCDL TEST 


000200 


036146 
000004 
177777 
000020 


035740 
036146 


001240 
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001236 


SEQUENCE 169 


5$: ERROR +345 ‘ie FL) ST 633 
BR 6$ 0 655 INTO 654 
ERROR +323 REPORT ips INCORRECT. 
6$: BR WwWC DONE 


3; THIS SUBROUTINE, STCSUB, IS USED TO SIT UP THE OPERANDS, EXECUTE 
;THE STCDI OR STCDL INSTRUCTION AND CHECK THE RESULTS. A CALL 
370 IT IS MADE THUS: 


; JSR PC,STCSUB 
; ACARG: .WORD X,X,X,X ;AC_OPERAND 
: RES: «WORD X,X sEXPECTED RESULT 
ERRES: .WORD X,X ERROR RESULT 
: PSB: «WORD X FPS BEFORE EXECUTION 
z FPSA: «WORD X :FPS AFTER EXECUTION 
ERFPS: .WORD xX ERROR FPS. 
FEC: «WORD X sEXPECTED FEC 
ERR1 ERROR +X DATA ERROR. 
BR CONT 
ERR2: ERROR +X FPS ERROR. 
CONT: sRETURN ADDRESS 


“THE OPERANDS ARE SET UP (USING ACO AS THE ACCUMULATOR). THEN 
*THE STCDI_ OR STCDL INSTRUCTION IS EXECUTED. 

;THE RESULT IS CHECKED AGAINST RES. IF THE RESULT IS CORRECT THEN THE FPS IS 
; COMPARED WITH FPSA IF THIS TOO IS CORRECT STCSUB eer: CONTROL 

ah THE CALLING ROUTINE AT CONT. IF THE FPS IS BAD STCSUB 

OMPARE IT TO ERROR FPS. IF THIS MATCHES THEN STCSUB WILL RETURN 
50 THE ERROR CALL AT ERR2, OTHERWISE STCSUB ITSELF 
- IF THE RESULT OF THE 

:STCDI OR STCDL IS INCORRECT, THE INCORRECT a) IS COMPARED WITH THE 
SANTICIPATED FAILING DATA PATTERN, ERRES. IF THE FAILURE IN 

:THE RESULT WAS ANTICIPATED CORRECTLY TO BE ERRES THEN STCSUB 

SWILL TRANSFER CONTROL TO THE ERROR CALL AT ERR1. OTHERWISE THE 

sRESULT WAS INCORRECT BUT WAS NOT ANTICIPATED AND STCSUB WILL 
sREPORT THE FAILURE AFTER WHICH CONTROL WILL BE PASSED TO CONT. 


STCSUB: MOV (SP)+,R1 :GET A POINTER TO THE ARGUMENTS. 
MOV #200,R0 ;SET UP THE ACO OPERAND. 
~~ R 
V 


R1,RO 
LDD (RO) ,ACO 
MOV Sia ae s INITIALIZE THE OUT PUT BUFFER, 


1$: MOV #-1,(R2)+ 
SOB RO,1$ 
MOV 20(R1),R0 ;SET THE FPS. 
LDFPS RO 
MOV #2$,$TMP2 
MOV ASTCIBF ,RO 
2$: STCDL ACO,(RO) 3 TEST INSTRUCTION, 
STFPS R4 ;GET THE FPS. 
STST R5 3GET THE FEC. 


R1,R2 
MOV R2,$TMP3 


1 


vo— 


TEST # 72 = STCDI AND STCDL TEST 


CKFPCCO_FPTIF FLTG PNT PRT C 


7107 035754 
7108 035760 
7709 035764 
7110 035772 
7111 035776 
7112 036004 

3 006 


ae 036106 
7140 036106 
7141 036110 


7144 036112 
7145 036116 
7146 036120 
7147 036124 
7149 036124 
7150 036126 
2 
7153 036130 
ar. 036144 


8 
Abe 036146 


7161 036156 
036156 





026105 
001027 
000161 


0101C2 


000161 


104322 
000760 


020461 
001002 
000761 


104323 
000751 


016137 


000742 


177777 


104412 


000010 
036146 
00000¢ 


000022 


000626 


000036 


000014 
036146 
000002 


000030 


000024 
000034 


000026 
001254 


177777 
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001242 
001252 


001256 


177777 


3$: CMP 


4$: JMP 
;DATA ERROR: 
;SEE IF THE 
15$: 


16$: CMP 


17$: 
;FAILURE WAS 
18$: ERROR 


zFPS INCORRE 
20$: CMP 


BNE 
JMP 


21$: 
sNOT ANTICIPATED SF pean BAD FPS HERE. 
+ 


SEQUENCE 

#10,R2 
R2,$TMP5 
#STCIBF ,STMP4 
R4,$TMP 
22(R1),$TMP10 
R1,R2 
#10,R2 
pS hes ;SEE IF THE RESULT IS CORRECT. 
Re, 
(RO)+, (R2)+ 
15$ 
R3,3$ 
22(R1) ,R2 
R2,R4 SEE IF THE FPS IS CORRECT. 
ay BRANCH IF INCORRECT. 
4$ 
26(R1),R5 sSEE IF THE FEC IS CORRECT. 
25$ ;BRANCH IF INCORRECT. 
36(R1) ;RETURN. 

FAILURE WAS ANTICIPATED. 

#14,R2° 


“#STCIBF ,RO 
#2,R3 
(RO)*+, (R2)+ 


R3,16$ 
30(R1) 


NOT ANTICIPATED SO REPORT INCORRECT RESULT HERE. 
+3522 ;DATA BAD 


CT, SO SEE IF FAILURE WAS ANTICIPATED. 
R4,24(R1) 


21$ 
34(R1) 


e2$: ERROR FPS BAD 
BR 
REPORT INCORRECT FEC. 
25$: MOV 26(R1) ,$TMP12 
MOV R5,$TMP11 
26$: ERROR +324 
BR 4$ 
;DATA BUFFER: 
STCIBF: .WORD -1,-1,-1,-1 
WWCDONE : 
RSETUP 3GO INITIALIZE THE FPS AND STACK; AND 


7SEE IF THE USER HAS EXPRESSED 


170 


OO ee 
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EST # 72 = STCDI AND STCDL TEST 


e 

\§ 

j 

ZTHE DESIRE TO CHANGE THE SOFTWARE 
[VIRTUAL CONSOLE SWITCH REGISTER (HAS 
:THE USER TYPED CONTROL G?). 

| a1e8 


—_—_— _—— 


& 


-—— _  -  - - - — 


] 
J 


| CKFPCCO_FPTIF FLTG PNT PRT C 


_ TEST # 73 = STCFL AND STCFI TEST 


' 


7171 


7174 

7175 036162 
036162 

7176 036164 

7177 036170 

7178 036200 


7182 036214 


7187 036226 
7188 


7189 036226 
036226 


000004 


104413 
004737 


104412 





035666 
177777 


177600 
177777 
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177777 


SEQUENCE 172 


.SBTTL TEST # 73 = STCFL AND STCFI TEST 


RRR ARAERAREREREKEREAREREREEEKHAERERIEHRERERHEE RHEE HAS AHEAD 


SeTEST 73 STCFL AND STCFI TEST 


:* THIS IS A TEST OF STCFL AND STCFI. IT 

+* MAKES USE OF THE SAME SUBROUTINE, STCSUB, 

+* WHICH WAS USED TO TEST STCDL AND STCDI. 

** 

TOPPER SESE SESASAASAESSASAEREEASES EEE SEE REESE ESSERE RRR RRR RRR RRR RRA SESS SY 


1$173: SCOPE 


sEXPONENT=37, tL=1 
XXC1: 


;SET UP THE LOOP ON ERROR ADDRESS. 


JSR PC,STCSUB 7GO EXECUTE THE INSTRUCTION. 


1$ “WORD 47777,-1,-1,-1 :ACO OPERAND. 
"WORD 77777.177600 sEXPECTED RESULT. 
3$ "WORD =. 77777..177777 ‘ANTICIPATED ERRONEOUS RESULT. 
4$ 40100 :FPS BEFORE EXECUTION. 
40100 ‘FPS AFTER EXECUTION. 
-1 ‘ANTICIPATED ERRONEOUS FPS. 
«1 sEXPECTED FEC. 
5$ ERROR +346 =X11(1,0940 ST 773x 
= ERROR +323 :REPORT FPS INCORRECT. 
XXCDONE : 


RSE TUP 3GO INITIALIZE THE FPS AND STACK; AND 
;SEE IF THE USER HAS EXPRESSED 

3 THE DESIRE TO CHANGE THE SOFTWARE 
;VIFTUAL CONSOLE SWITCH REGISTER (HAS 


3 THE USER TYPED CONTROL G?). 
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TEST # 74 = STEXP TEST 


7198 .SBITL TEST # 74 = STEXP TEST 
SLATER ARERAHORRERRARAAAAEREERAREKRARARORRARRRERRERARERERRRRARRER 
*TEST 74 STEXP TEST 
t* THIS IS A TEST OF THE STEXP 
+* INSTRUCTION 


2. 


LAAN ORR RRR E EE EERE ERE EEE EERE ARERR EERE REE EEE EER 
“saad 036230 000004 TST74: SCOPE 
| 7200 : EXP = 100 (EXCESS 200) 
7201 036232 YYC1: 
036232 104413 LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
7202 036234 004737 036520 JSR PC,STXSUB 
| 7203 036240 0000 000000 000000 1$: .WORD 20000,0,0.0 sAC 
7204 036250 177700 2$: -100 : sEXP RES 
7205 036252 052525 3$: $2525 sERROR EXP. 
| 7206 036254 43: 49000 7FPSB 
7207 036256 040010 40010 sFPSA 
7208 026260 040000 40000 sERROR FPS 
| 7209 262 104247 S$: ERROR +347 yBAD EXP 
7210 036264 401 R 6$ 
| 7211 036266 104352 ERROR +352 7+(BUT ENBT) ST 376 
rele 036270 6$: 
| 721% ; EXP = 200 (EXCESS 200) 
7215 036270 YYC2: - 
036270 104413 LPERR SET UP THE LOOP ON ERROR ADDRESS. 
7216 036272 004737 036520 JSR PC,STXSUB :GO EXECUTE THE INSTRUCTION. 
7217 036276 040000 000000 000000 1$: “WORD  40000,0,0.0 [ACO OPERAND. 
7218 306 2$: 0 :EXPECTED EXPONENT RESULT. 
7219 036310 052525 3$: 52525 ;ANTICIPATED ERRONEOUS RESULT. 
7220 036312 040000 4$: 40000 PS BEFORE EXECUTION. 
7221 036314 040004 40004 FPS AFTER EXECUTION. 
7222 036316 040000 40000 :ANTICIPATED ERRONEOUS FPS. 
7223 036320 104347 5$: ERROR +347 REPORT RESULT INCORRECT. 
7224 036322 000401 BR 6$ 
7225 036324 104353 ERROR +353 7 (BUT EZBT) ST 071 
7226 zT0 072 INT 272 
7227 036326 6$: 
7228 
7229 : EXP = 201 (EXCESS 200) 
7230 
7231 036326 YYC3: 
036326 104413 LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
7232 036330 004737 036520 JSR PC pixse :GO EXECUTE THE INSTRUCTION. 
7233 036334 040200 000000 000000 1$: -WORD  40200,0,0.0 ‘ACO OPERAND. 
72 36344 2$: 1 EXPECTED EXPONENT RESULT. 
7235 036346 052525 3$: §2525 ;ANTICIPATED ERRONEOUS RESULT 
7236 036350 040000 4$: 40000 PS BEFORE EXECUTION. 
7237 036352 040000 40000 FPS AFTER EXECUTION. 
7238 036354 040004 40004 zANTICIPATED ERRONEOUS FPS. 
7239 036356 104347 S$: ERROR +347 sREPORT RESULT INCORRECT. 
7240 036360 000401 BR 6% 
7241 036362 104354 ERROR +354 :(BUT EZBT) ST 071 
6$: :T0 272 INTO 072 


7242 036364 
7243 
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TEST #@ 74 = STEXP TEST 


7244 : EXP = 375 (EXCESS 200) 
7345 
7546 036364 —-YYCG: 
036364 104413 LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
7247 036366 004737 036520 jSR.—«PC, STXSUB “GO EXECUTE THE INSTRUCTION. 
7548 036372 077200 000000 000000 13: “WORD -77200,0.0,0 ACO OPERAND.. 
7549 036402 000175 2$: i75 “EXPECTED EXPONENT RESULT. 
7250 036404 052525 S$: 52525 SANTICIPATED ERRONEOUS. RESULT. 
7251 036406 04 i 40000 FPS BEFORE EXECUTION. 
7552 036410 40000 “EPS AFTER EXECUTION. 
7553 036412 040010 4001 “ANTICIPATED ERRONEOUS FPS. 
7354 036414 106347 S$ ERROR +347 “REPORT RESULT INCORRECT. 
7555 036416 000401 BR 6$ 
| 7256 036420 104355 ERROR +355 : (BUT ENBT) ST 376 
7297 08642 6$ “10 471 INTO 071 
| 7259 3 EXP = 1° (EXCESS 200) 
| 7560 
| —- 7261 036422 yYC5 
} 026422 104413 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
7262 036424 006737 036520 JSR PC, STXSUB GO EXECUTE THE INSTRUCTION. 
7563 036430 000200 900000 000000 1$: “WORD 200,0,0,0 “ACO OPERAND. 
7564 036440 177601 2$: te dee “EXPECTED EXPONENT RESULT. 
7365 036442 052525 S$ 52525 : ANTICIPATED ERRONEOUS RESULT. 
| 7266 036444 04 i$ 40000 PS BEFORE EXECUTION. 
7267 036446 040010 40010 “FPS AFTER EXECUTION. 
| 7268 036450 04 40000 ANTICIPATED ERRONEOUS FPS. 
7369 036452 104347 5$ ERROR +347 “REPORT RESULT INCORRECT. 
7370 036454 000401 6$ 
7571 036456 104352 ERROR +352 :REPORT FPS INCORRECT. 
7272 036460 6$ 
727% : EXP = 156 (EXCESS 200) 
797 
7576 0 vYC6 
036460 104413 LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
7277 036462 004737 036520 JSR. «PC, STXSUB “GO EXECUTE THE INSTRUCTION. 
7278 036466 033400 000000 000000 18: “WORD 33400,0.0,0 ACO OPERAND. 
7279 036476 177756 2$: 239 EXPECTED EXPONENT RESULT. 
7280 036500 052525 S$: 52525 : ANTICIPATED ERRONEOUS RESULT. 
7381 036502 047707 is: 19707 PS BEFORE EXECUTION. 
7282 036504 047710 47710 cFPS AFTER EXECUTION, 
7583 036506 177777 ‘ “ANTICIPATED ERRONEOUS FPS. 
7384 036510 104347 5$ ERROR +347 “REPORT RESULT INCORRECT. 
7285 036512 000401 BR 6$ 
7286 03651% 104350 ERROR +350 REPORT FPS INCORRECT. 
7288 036516 000510 6$: BR YYCDONE 





THIS SUBROUTINE, STXSUB, IS USED TO SET UP THE OPERANDS, EXECUTE 
THE STEXP INSTRUCTION AND CHECK THE RESULTS. A CALL 
:TO IT IS MADE THUS: 


JSR PC, STXSUB 
ACARG: .WORD MXM SM ;AC OPERAND 
RES: ~WORD xX sEXPECTED RESULT 


ERRES: .WORD xX ZERROR RESULT 
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TEST #@ 74 = STEKP TEST 


012603 


NN 
QSNNRSSSSSS 


000161 


020461 


036606 001236 
123456 036726 
076543 036730 


000016 001252 
036726 001242 
000010 036726 


000012 036726 


FPSB: «WORD 


x sFPS BEFORE EXECUTION 
FPSA: ~WORD x 
x 


FPS AFTER EXECUTION 


ERFPS: . WORD -RROR FPS. 
ERR1: ERROR +x [DATA ERROR. 

BR CONT 
ERR2: ERROR +X FPS ERROR. 
CONT: RETURN ADDRESS 


"THE OPERANDS ARE SET UP (USING 4 AS THE ACCUMULATOR). THEN 

3 THE STEXP INSTRUCTION IS EXECU 

THE RESULT IS CHECKED AGAINST YRES: IF THE RESULT IS CORRECT THEN THE FPS JS 
S COMPARED WITH FPSA IF THIS TOO IS CORRECT STXSUB “i iven CONTROL 

3TO THE CALLING ROUTINE AT CONT. IF THE FPS IS BAD STXSUB 

>COMPARE IT TO ERROR FPS. IF THIS MATCHES THEN OTXSUB WILL RETURN 

3TO THE ERROR CALL AT ERR2, OTHERWISE STXSUB ITSELF 

[REPORTS THIS FAILURE AND THEN RETURNS TO CONT. IF THE RESULT OF THE 


ZSTEXP IS INCORRECT, THE INCORRECT RESULT IS COMPARED WITH THE 
ANTICIPATED FAILING DATA PATTERN, ERRES. IF THE FAILURE IN 


3 THE RESULT WAS ANTICIPATED CORRECTLY TO BE ERRES THEN STXSUB 
twWILL TRANSFER CONTROL TO THE ERROR CALL AT ERR1. OTHERWISE THE 
RESULT WAS INCORRECT BUT WAS NOT ANTICIPATED AND STXSUB WILL 
SREPORT THE FAILURE AFTER WHICH CONTROL WILL BE PASSED TO CONT. 


STXSUB: MOV (SP)+,R1 :GET A POINTER TO THE ARGUMENTS. 
MOV R1,R2 
MOV R2,$TMP3 
ADD #10,R2 
MOV (R2)4+,$TMPS 


MOV #1$,$TMP2 

MOV #123456, STXBF 
MOV #76543, STXBF +2 
MOV #200,R0 


LDFPS 
MOV R1,RO :SET UP THE ACO OPERAND. 
LDD (RO) ,ACO 
"7 16(R1,,RO0 sSET THE FPS. 
LDFPS RO 
MOV #STXBF ,RO 
1$: STEXP ACO, (RO) sTEST INSTRUCTION. 
STFPS R4 ; »GET FPS. 
MOV R4,$TMP7 
MOV 16(R1),$TMP10 
MOV STXBF ,$TMP4 
CMP 10(R1),STXBF sWAS RESULT CORRECT? 
BEQ 5$ * BRANCH IF CORRECT 
CMP 12(R1),STXBF SOTHERWISE SEE IF THE FAILURE WAS ANTICIPATED. 
BNE 2$ 
JMP 22(R1) 
a? NOT ANTICIPATED REPORT ERROR HERE. 
es: 
3$: ERROR +347 ZExP BAD 
4$: JMP 30(R1) 
5$: CMP R4,16(R1) sSEE IF THE FPS is CORRECT. 
BEQ 10$ * BRANCH IF CORREC 
CMP R4,20(R1) sSEE IF THE PAT URE WAS ANTICIPATED. 
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CKFPCCO FRIIF FLTG PNT PRT C MACRO M1113 O9=APR=81 13:53 PAGE 69-3 SEQUENCE 176 
TEST #@ 74 = STEP TEST 


7355 036676 001002 BNE 6$ 

7396 036700 000161 000026 JMP 26(R1) 

7258 3FPS ERROR WAS NOT ANTICIPATED SO RFPORT ERROR HERE. 

359 036704 é$: 

7,60 036704 104350 7$: ERROR +350 ZFPS BAD 

7361 036706 000764 BR 

7363 >SEE IF MORE THAN ONE WORD WAS WAITTEN IN THE OUTPUT BUFFER. 

7364 036710 022737 076543 036730 108: CMP #76543, STXBF +2 

7365 036716 001760 BEQ 4$ 

7366 036720 104351 11$: ERROR +351 sFDFL+*O ST 347x 

7367 036722 000756 BR 4$ 

7369 036724 177777 a 

7370 036726 177777 (177777 «+177777:«STXBF: .WORD  -1,-1,-1,-1,-1 

7372 036740 YYCDONE : 

036740 104412 RSETUP :GO INITIALIZE THE FPS AND STACK; AND 

‘SEE IF THE USER HAS EXPRESSED 
‘THE DESIRE TO CHANGE THE SOFTWARE 
‘VIRTUAL CONSOLE SWITCH REGISTER (HAS 

2 ;THE USER TYPED CONTROL G?). 
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CKFPCCO FRIIF FLTG PNT PRT C MACRO M1113 09=APR=81 13:53 PAGE 70 SEQUENCE 
TEST #@ 75 = STST TEST 


7FRG .SRTTL TEST # 75 = STST TEST 


4 PeTeerTreTTTTTTT TTT TITEL TPE LT LLL 


T*TEST 75 STST TEST 


* THIS IS A TEST OF THE STST 

* INSTRUCTION. FIRST AN ILLEGAL FPS OP CODE 
3* CINSTRUCTION) IS USED TO ENTER AN 
;* ERROR CONDITION IN THE FEC AND 

* FEA, THE STST IS EXECUTED AND 

» THE FEC AND FEA ARE CHECKED 


POPP PRR eRe R SERS SESE RRR RRR RSE RRR ERR RRR RRR RRR RRR RR RRR RRR RRR RRS DD DD! 


73R5 036742 000004 TS175: SCOPE 
7386 036744 22C1: 
036744 104413 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
7387 036746 012700 040000 MOV 440000,RO SET FPS. FID=1. 
Bee, 036752 170100 LDFPS = RO 
ei 026754 170003 27ZCe: -WORD 170003 oe tape FPP 
7392 036756 Oler 037132 MOV AZ7CBF RO ;SET UP THE OUTPUT BUFFER. 
7393 036762 012710 177777 MOV #-1, (RQ) 
7394 036766 012760 177777 000002 MOV #-1,.2(RO) 
7395 036774 012737 037002 001236 MOV #272(3,$TMP2 
ea. | 037002 170310 e2C3: SYST (RO) +1 ¥ FEC AND 
7398 037004 170204 STFPS  R4 GET FPS. 
7399 037006 012700 037132 MOV #7Z7C(BF ,RO 
7400 037012 011037 001240 MOV (RO), $TMP3 
7401 037016 016037 000002 001242 MOV 2(RO) ,STMP4 
7402 037024 012737 000002 001244 MOV #2,$TMP5 
7403 037032 012737 036754 001246 MOV Hie. _STMPE 
7404 037040 010437 001250 MOV 
wie 037044 012737 140000 001252 MOV #140000. $TMP10 
7407 037052 022710 000002 CMP #2,(RO) ;SEE IF FEC IS CORRECT. 
7408 037056 001010 BNE 72¢5 BRANCH IF INCORRECT. 
7409 037060 022760 036754 000002 CMP #72702,2(RO) ;SEE IF FEA, ADDRESS, IS CORRECT. 
7410 037066 001006 BNE 2ZC10 BRANCH IF INCORRECT 
7411 037070 022704 140000 CMP Hest ee R4 :SEE IF FPS IS CORRECT. 
7412 037074 001013 BNE 22C1 [BRANCH IF INCORRECT. 
iz 037076 000422 BR IF CDONE 
7415 REPORT FEC INCORRECT 
7416 037100 2ZC5: 
7417 037100 104356 1$: ERROR +356 STST BAD 
rs 037102 000420 BR ZZCDONE sFECX 
7420 ; REPORT FEA INCORRECT 
7421 037104 022760 177777 000002 27C(10: CMP #-1,2(RO) 
7422 037112 001402 BEQ 2ZC12 
7423 037114 104357 1$: ERROR +357 3STST BAD FEA 
7424 037116 000412 BR ZZ2CDONE 
7425 037120 2ZCl2: 
7426 037120 104360 1$: ERROR +360 :SET FD FL ST 636 
7427 037122 000410 BR Z2ZCDONE 


177 


CKFPCCO FPIIF FLTG PNT PRT C 
TEST #@ 75 = STST TEST 


7428 

7429 

7430 037124 

7431 037124 104361 
Log 037126 000406 


7434 
7435 037130 177777 


2436 037132.-«177777-—«:177777 


7437 037142 177777 


7438 
7439 037144 
037144 104412 


; J 14 
MACRO M1113 O9-APR=81 13:53 PAGE 70-1 


{REPORT FPS INCORRECT 
1$: ERROR +361 sFPS x AFTER ST ST 
BR 7ZCDONE 


DATA BUFFER: 
-] 
177777 = 27CBF: i OF gt gt 


ZZCDONE : 
RSE TUP 3G0 INITIALIZE THE FPS AND STACK; AND 
;SEE IF THE USER HAS EXPRESSED 
; THE DESIRE TO CHANGE THE SOF TWARE 
3VIRTUAL CONSOLE SWITCH REGISTER (HAS 
3; THE USER TYPED CONTROL G?). 


SEQUENCE 


178 
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SETUP FOR TESTS 76 THROUGH 104 
7441 . SBTTL 


¢ SEQUENCE 179 
\ 
SETUP FOR TESTS 76 THROUGH 104 


7442 037146 005037 177572 CLR MMRO :MAKE SURE MEMORY MANAGEMENT IS OFF. 

7443 037152 170127 040000 LDFPS #40000 sLOAD FPS STATUS. 

7444 037156 012700 077406 MOV #77406,RO LOAD RO WITH 77406 

7445 037162 012701 077400 MOV #77400,R1 LOAD R1 WITH 77400 

7446 037166 010037 172320 MOV RO, KDPDRO :MAKE KDPDRO RESIDENT. 

7447 037172 010137 172322 MOV R1,KDPDR1 sMAKE DPDR1 NON-RESIDENT. 

7448 037176 010137 172324 MOV R1,KDPDR2 MAKE KDPDR2 NON-RESIDENT. 

| - 7449 037202 010037 172326 MOV RO, KDPDR3 :MAKE KDPDR3 RESIDENT FOR ADDRESSES 60000-77756. 
7450 037206 010037 172330 MOV RO, KDPDR4 sMAKE KDPDR4 RESIDENT FOR ADDRESSES 77760-77776. 
we 037212 010037 172336 MOV RO,KDPDR7 MAKE KDPDR7 RESIDENT (I/O PAGE). 

7453 037216 005037 172360 CLR KDPARO ;MAP D=PAGE O FOR 0=4K. 

7454 037222 012737 000200 172362 MOV #200,KDPAR1 MAP D-PAGE 1 FOR 4-8K. 

7455 037230 012737 000400 172364 MOV #400, KDPAR2 sMAP D=-PAGE 2 FOR 8-12K. 

7456 037236 012737 000600 172366 MOV #600, KDPAR3 sMAP D=-PAGE 3 FOR ACCESSING ADDRESSES 60000-77756. 
7457 037244 012737 000600 172370 MOV #600, KDPARS sMAP D=PAGE 4 FOR ACCESSING ADDRESSES 77760-77776. 
Pas 037252 012737 177600 172376 MOV #177600,KDPAR7 ;MAP D=PAGE 7 FOR I/O PAGE. 

7460 037260 010037 172300 MOV RO,KIPDRO :MAKE KIPDRO RESIDENT. 

7461 037264 010037 172302 MOV RO,KIPDR1 sMAKE KIPDR1 RESIDENT. 

7462 037270 010037 172304 MOV RO,KIPDR2 MAKE KIPDR2 RESIDENT. 

7463 037274 010137 172306 MOV R1,KIPDR3 >MAKE KIPDR3 NON-RESIDENT FOR USING ADDRESSES 60000-77756. 

7464 037300 010137 172310 MOV R1,KIPDR4 :MAKE KIPDR4 NON-RESIDENT FOR USING ADDRESSES 77760-77776. 

o> 037304 010037 172316 MOV RO,KIPDR7 “MAKE KIPDR7 RESIDENT (1/0 PAGE) 

7467 037310 005037 172340 CLR KIPARO :MAP I-PAGE 0 FOR 04K. 

7468 037314 012737 000200 172342 MOV #200, KIPAR1 P I=PAGE 1 FOR 4-8K. 

7469 037322 012737 000400 172344 MOV #400, KIPAR2 mA I-PAGE 2 FOR 8-12K. 

7470 037330 012737 000600 172346 MOV #600, KIPAR3 MAP I-PAGE 3 FOR ACCESSING ADDRESSES 60000-77756. 

7471 037336 012737 000600 172350 MOV #600, KIPARG MAP I=PAGE 4 FOR ACCESSING ADDRESSES 77760-77776. 

oh 037344 012737 177600 172356 MOV #177600, KIPAR7 P I=PAGE 7 FOR I/O PAGE. 

7474 037352 013737 000250 001262 MOV MMVECT,$TMP14  ;MOVE MM TRAP VECTOR TO $TMP14 FOR TEMP STORAGE. 

7475 037360 012701 117760 MOV ADATA,R1 :SET UP R1. 

7476 037364 012702 117770 MOV ADATA+10,R2 SET UP R2. 

7477 037370 012703 117772 MOV ADATA+12,R3 :SET UP R3. 

7478 037374 012737 040010 000250 MOV #TRAPV.MMVECT  :SET UP FOR FP TRAPS FOR THIS TEST. 

7479 037402 012737 000340 000252 MOV #340 ,MMVECT+2 

7480 037410 012737 000024 172516 MOV #24 ,MMR3 TURN ON 22-BIT KERNEL D=SPACE. 

7481 037416 012737 117760 077770 MOV #DATA, 77770 *SET UP ADDRESS POINTER. 


r- . —— tannins a 


CKFPCCO FRIIF FLTG PNT PRT C MACRO M1113 gg oP 13:53 PAGE b3'* SEQUENCE 180 
_ TEST # 76 = ENABLE D=SPACE & SEE I=SPACE FORCED, MODE 


7495 .SBTTL TEST # 76 = ENABLE D=SPACE & SEE I=SPACE FORCED, MODE 1 


TERPS SOSASSARASESA LESSER RR SRS SR SSSR RRR RRR SERA RRR RRR ARRAS RSA RASS SD OS 


esTEst 76 ENABLE D=SPACE & SEE I-SPACE FORCED, MODE 1 


:* THIS IS A TEST THAT WILL ENABLE D-SPACE AND MAKE IT RESIDENT SO THAT AN 
;* INSTRUCTION THAT ACCESSES I=SPACE WHEN IT NORMALLY SHOULDN'T WILL CAUSE A 
MEMORY MANAGEMENT TRAP/ABORT. 


ie xx*ALL REFERENCES TO MICRO=FLOWS REFER TO *FP11-F-2 REV A* FLOWS#**** 
3* THE COMMENTS FOR EACH TEST LINE ARE WRITTEN SO YOU CAN GO TO THE MICRO FLOWS 
;* AND PINPOINT THE PROBLEM AREA. FROM THERE, HARDWARE ANALYSIS SHOULD BE EASIER. 
z* INSTRUCTION GROUPS ISOLATED BY BLANK LINES ARE TO BE EXECUTED TOGETHER 
| ;* DUE TO PROPER SETUP PURPOSES. I.E. THE LOCATION OR ADDRESS HAS TO BE 
3* INITIALIZED PROPERLY BEFORE THE INSTRUCTION CAN BE ACCOMPLISHED. 
| *: TRAARARARAREEPESARRERE RARER ER ESSE SER ERS SSR R SERRA RR ASRS RRR RRR ARSE SS 
037424 000004 SaI Tee SCOPE 
7496 037426 72F1 
037426 9104413 LPERR 4 UP THE LOOP ON ERROR a 
7497 037430 00523” 177572 INC MMRO URN ON MEMORY MANAGEMEN 
7498 :* THIS INSTRUCTION WILL” Test FOR A WORST-CASE HARDWARE PROBLEM. 
7499 037434 170000 CFCC :* TEST INSTRUCTION WHICH SHOULD ALWAYS INVOKE DSPACE. 
7500 037436 010100 MOV R1,RO [SETTING UP RO. 
7501 037440 170410 CLRF (RO) TESTING BLOCKS 27-K AND 27-R. 
7502 037442 177010 LDCIF (RO) ,ACO STESTING BLOCKS 28-F AND 28-P. 
7503 037444 172410 LDF (RO) ,ACO TESTING BLOCKS 4-J, 4-X, 4-2 AND 4-88. 
7504 037446 170310 STST (RO) ; TESTING BLOCKS 33-E AND 33-P. 


7505 037490 005037 177572 CLR MMRO ;TURN OFF MEMORY MANAGEMENT. 





r 
' 
| 
| 
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TEST # 77 = ENABLE D=SPACE é SEE I=SPACE FORCED, MODE 2 


7506 .SBTTL TEST # 77 = ENABLE D=SPACE & SEE I-SPACE FORCED, MODE 2 


SARA ERA ERE EERE ERE ERE IRERERA AKER E REA KKKRAE KEKE 


:*TEST 77 ENABLE D=SPACE & SEE I-SPACE FORCED, MODE 2 


THIS IS A TEST THAT WILL ENABLE D=SPACE AND MAKE IT RESIDENT SO THAT AN 
INSTRUCTION THAT ACCESSES I=SPACE WHEN IT NORMALLY SHOULDN'T WILL CAUSE A 
MEMORY MANAGEMENT TRAP/ABORT. 

****ALL REFERENCES TO MICRO-FLOWS REFER TO *FP11-F-2 REV A® FLOWS***** 

THE COMMENTS FOR EACH TEST LINE ARE WRITTEN SO YOU CAN GO TO THE MICRO FLOWS 
AND PINPOINT THE PROBLEM AREA. FROM THERE, HARDWARE ANALYSIS SHOUL BE EASIER. 
INSTRUCTION GROUPS ISOLATED BY BLANK LINES ARE TO BE EXECUTED TOGETHER 

DUE TO PROPER SETUP PURPOSES. I.E. THE LOCATION OR ADDRESS HAS TO BE 
INITIALIZED PROPERLY BEFORE THE INSTRUCTION CAN BE ACCOMPLISHED. 


neane epee ee He He 


POPPE SSESESESLASESLSESESE SERRE SSSR SSR AS ES ERA RRR SRR RSA SASS SRDS SSS | 


4h Se Be Be Be Be Be Be Be Be Be Be 


037454 000004 ST77: SCOPE 
7507 037456 005237 177572 INC MMRO ; TURN ON MEMORY MANAGEMENT. 
7508 037462 010100 MOV R1,RO SETTING UP RO. 
7509 037464 170520 TSTF (RO) + 3 TESTING BLOCK 21-AA. 
base 027466 170527 001000 TSTF #1000 
7512 037472 010100 MOV R1,RO0 CORRECTING RO. 
7513 037474 170420 CLRF (RO) + 3; TESTING BLOCKS 27-K AND 27-R. 
7514 z**NOTE**: THE LOCATION AFTER THE CLRF, AND STST MODE 2 REG 7 INSTRUCTIONS 
7515 *WILL* BE CHANGED ON SUBSEQUENT PASSES, BUT IS **NOT** INCORRECT. THE 
7516 ACTUAL CONTENTS OF THOSE LOCATIONS IS IMMATERIAL, AS THIS TEST INSURES 
7517 THAT THE INSTRUCTION DOES EXECUTE WITHOUT ACCESSING THAT LOCATION AS 
7518 ZA ‘Beer ACCESS. 
gh 037476 170427 001000 CLRF #1000 
7521 037502 010100 MOV R1,RO ; CORRECTING RO. 
7522 037504 177020 LDCIF (RO) +,ACO TESTING BLOCKS 28-F AND 28-P. 
ext 037506 177027 001000 LDCIF #1000,AC0 
7525 037512 010100 MOV R1,RO CORRECTING RO.B 
7526 037514 172420 LDF (RO) +,ACO ; TESTING BLOCKS 4-NN, 4-X, 4-Z AND 4-BB. 
aeri4 037516 172427 042572 LDF #1000,ACO 
7529 037522 010100 MOV R1,R0 ; CORRECTING RO. 
7530 037524 170320 STST (RQ) + TESTING BLOCKS 33-) AND 33-P, 
7531 037526 170327 001000 STST #1000 


7532 037532 005037 177572 CLR MMRO TURN OFF MEMORY MANAGEMENT. 





xd 
| 
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TEST # 100 = ENABLE D=SPACE & SEE I=SPACE FORCED, MODE 3 


7533 .SBTTL TEST # 100 = ENABLE D=SPACE & SEE I-SPACE FORCED, MODE 3 
| SAAR ARERR ARRAEARERARRARARER PERERA REREAD 
| S*TEST 100 ENABLE D=SPACE & SEE I-SPACE FORCED, MODE 3 
:* THIS IS A TEST THAT WILL ENABLE D=SPACE AND MAKE IT RESIDENT SO THAT AN 
;* INSTRUCTION THAT ACCESSES I-SPACE WHEN IT NORMALLY SHOULDN'T WILL CAUSE A 
:* MEMORY MANAGEMENT TRAP/ABORT. 
i* *s*8ALL REFERENCES TO MICRO=FLOWS REFER TO *FP11-F-2 REV A® FLOWS*#«® 
>* THE COMMENTS FOR EACH TEST LINE ARE WRITTEN SO YOU CAN GO TO THE MICRO FLOWS 
:* AND PINPOINT THE PROBLEM AREA, FROM THERE, HARDWARE ANALYSIS SHOULD BE EASIER. 
:* INSTRUCTION GROUPS ISOLATED BY BLANK LINES ARE TO BE EXECUTED TOGETHER 
>* DUE TO PROPER SETUP PURPOSES. 1.£. THE LOCATION OR ADDRESS HAS TO BE 
:* INITIALIZED PROPERLY BEFORE THE INSTRUCTION CAN BE ACCOMPLISHED. 
** 
lpeeeewee ARS RASRAAAASSASRA SERA SE SSS SES ES SSE SRRRARARARRRRRRSASLASASA ES SE I 
037536 000004 1ST100: SCOPE 
7534 037540 005237 177572 INC MMRO ; TURN ON MEMORY MANAGEMENT. 
7535 037544 010200 MOV R2,RO SSETTING UP RO. 
7536 037546 170530 TSTF a RO)+ S TESTING BLOCK 21-N. 
7337 027550 170537 117760 TSTF = DATA 
7539 037554 010200 MOV R2,RO : CORRECTING RO. 
7540 037556 170430 CLRF  a(RO)+ ‘TESTING BLOCKS 27-U, 27-T AND 27-R. 
7541 037560 170437 117760 CLRF DATA 
7543 037564 010200 MOV R2,RO : CORRECTING RO. 
7544 037566 177030 LDCIF a(RO)+,ACO [TESTING BLOCKS 28-L, 28-N AND 28-P. 
7545 037570 177037 117760 LDCIF DATA,ACO 
7547 037574 010200 MOV R2,RO : CORRECTING RO. 
7548 037576 172430 LDF a(RO) +, ACO [TESTING BLOCKS 4-R, 4-T, 4=X, 4-2 AND 4-BB. 
7549 037600 172437 117760 LDF DATA, ACO 
7551 037604 010700 MOV R2,RO s CORRECTING RO. 
7552 037606 170330 STST a(RO) + : TESTING BLOCKS 33-L, 33=-N AND 33-P. 
7553 037610 170357 117760 STST DATA 


7554 037614 005037 177572 CLR MMRO 3 TURN OFF MEMORY MANAGEMENT. 
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TEST # 101 = ENABLE D=SPACE & SEE I-SPACE FORCED, MODE 


7555 .SBTTL TEST # 191 = ENABLE D=SPACE & SEE I-SPACE FORCED, MODE 4 


CEPA aeP ARERR RRRRRASASASRRRRR SAR RS ERAS ASRS RAR RRR RRR RR SAS RRS ASSES SS 


geTEsT 101 ENABLE D=SPACE & SEE I-SPACE FORCED, MODE 4 


'* 
-* 


rs 


037620 000004 
7556 037622 005237 177572 
7557 037626 010200 
7558 037630 172440 
7559 027632 005037 177572 


THIS IS A TEST THAT WILL ENABLE D=SPACE AND MAKE IT RESIDENT SO THAT AN 
INSTRUCTION THAT ACCESSES I-SPACE WHEN IT NORMALLY SHOULDN'T WILL CAUSE A 
MEMORY MANAGEMENT TRAP/ABORT. 

xe**ALL REFERENCES TO MICRO-FLOWS REFER TO *FP11-F=2 REV A® FLOWS***#* 

THE COMMENTS FOR EACH TEST LINE ARE WRITTEN SO YOU CAN GO TO THE MICRO FLOWS 


AND PINPOINT THE PROBLEM AREA. FROM THERE, HARDWARE ANALYSIS SHOULD BE EASIER. 


INSTRUCTION GROUPS ISOLATED BY BLANK LINES ARE TO BE EXECUTED TOGETHER 
DUE TO PROPER SETUP PURPOSES. I.E. THE LOCATION OR ADDRESS HAS TO BE 
INITIALIZED PROPERLY BEFORE THE INSTRUCTION CAN BE ACCOMPLISHED. 


Whee SRS RARARA SERA R RR RRRRRR RRR RARER RRR RR RAR RRR RRR RRRRR RRR REDS S DF 


$7101: SCOPE 


INC MMRO ; TURN ON MEMORY MANAGEMENT. 

MOV R2,RO SETTING UP RO. 

LDF -(RO) ,ACO TESTING BLOCKS 4-J, 4-X, 4-Z AND 4-BB. 
CLR MMRO :TURN OFF MEMORY MANAGEMENT. 


183 


cc - - 


7560 


037636 
7561 037640 
7562 037644 
7563 037646 
7564 


7565 037650 
7566 037652 
7567 
7568 037654 
7569 037656 
7570 
7571 037660 
7572 037662 
757 


3 
7574 037664 
7575 037666 
7576 037670 


0 
170550 


010200 
170450 


010300 
177050 


«210300 
“172450 


pitas 
170350 
005037 


CKFPCCO FPTIF FLTG PNT PRT C 
TEST # 102 = ENABLE D=SPACE & SEE I-SPACE FORCED, MODE 


- SBTTL 


177572 


177572 


¢_15 
MACRO M1113 09-APR-81 at 53 PAGE 77 


SEQUENCE 


TEST # 102 = ENABLE D=SPACE & SEE I-SPACE FORCED, MODE 5 


SL RARER AERKRERERERRAEARERERERERERRIKRERARRRERRAARARERERERRRRRS 


ENABLE D-SPACE & SEE I-SPACE FORCED, MODE 5 


. 
As 
. 


mag Be Be Be Be Be Be Be Be Be Be Be 


eRe ee 
nee ep ep ee Ree 


TEST 102 
THIS IS A 


TEST THAT WILL ENABLE D-SPACE AND MAKE IT RESIDENT SO THAT AN 


INSTRUCTION THAT ACCESSES I=SPACE WHEN IT NORMALLY SHOULDN'T WILL CAUSE A 


MEMORY MANAGEMENT TRAP/ABORT. 


xe*eALL REFERENCES TO MICRO=FLOWS REFER TO *FP11-F-2 REV A® FLOWS***** 
THE COMMENTS FOR EACH TEST LINE ARE WRITTEN SO YOU CAN GO TO THE MICRO FLOWS 


AND PINPOINT THE PROBLEM AREA. 


FROM THERE, HARDWARE ANALYSIS SHOULD BE EASIER. 


INSTRUCTION GROUPS ISOLATED BY BLANK LINES ARE TO BE ExeCUTED TOGETHER 


DUE TO PROPER SETUP PURPOSES. 


THE LOCATION OR ADDRESS HAS TO BE 


I.E. 
INITIALIZED PROPERLY BEFORE THE INSTRUCTION CAN BE ACCOMPLISHED. 


FRA EREKERR EERE ERRARRERREARRAEEKARKRAERR ARERR 


ST102: SCOPE 


MMRO 
R3,RO 


a- (RO) 
R3,RO 
a-(RO) 
R3,RO 
a-(RO) ,ACO 


R3,RO 
a-(RO) ,ACO 


R3,RO 
a-(RO) 
MMRO 


; TURN ON MEMORY MANAGEMENT. 
ZSETTING UP RO. 
TESTING BLOCK 21-U. 


; CORRECTING RO. 
TESTING BLOCKS 27-X, 27=T AND 27-R. 


CORRECTING RO. 
TESTING BLOCKS 28-S, 28-N AND 28-P. 


CORRECTING RO. 
TESTING BLOCKS 4-U, 4-T, 


; CORRECTING RO. 
TESTING BLOCKS 33-S, 33-N ADN 33-P. 
;TURN OFF MEMORY MANAGEMENT. 


4-X, 4-2 AND 4-BA. 


eoo—_———_ a ———— ———— . ——— 
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| TEST # 103 = ENABLE D=SPACE & SEE I=SPACE FORCED, MODE 6 


7577 .SBTTL TEST # 103 = ENABLE D=SPACE & SEE I-SPACE FORCED, MODE 6 


| SARA EERE EERE ORERERRERARRAARRARAEAEARE HED 


S*TEST 103 ENABLE D=SPACE & SEE I-SPACE FORCED, MODE 6 


* THIS IS A TEST THAT WILL ENABLE D=-SPACE AND MAKE IT RESIDENT SO THAT AN 

* INSTRUCTION THAT ACCESSES I-SPACE WHEN IT NORMALLY SHOULDN'T WILL CAUSE A 

* MEMORY MANAGEMENT TRAP/ABORT. 

* x***ALL REFERENCES TO MICRO-FLOWS REFER TO *FP11-F-2 REV A®* FLOWS***** 

* THE COMMENTS FOR EACH TEST LINE ARE WRITTEN SO YOU CAN GO TO THE MICRO FLOWS 

* AND PINPOINT THE PROBLEM AREA. FROM THERE, HARDWARE ANALYSIS SHOULD BE EASIER. 
* INSTRUCTION GROUPS ISOLATED BY BLANK LINES ARE TO BE EXECUTED TOGETHER 
* DUE TO PROPER SETUP PURPOSES. 1.€&. THE LOCATION OR ADDRESS HAS 10 BE 
* INITIALIZED PROPERLY BEFORE THE INSTRUCTION CAN BE ACCOMPLISHED. 


FERRARA EEEEREEREREE TREE AREER REKEEAEREREEKEKEKEREEREREERAERE NE 


3 037674 000004 S$T103: SCOPE 


757, -DSABL AMA ;DISABLE MODE 6 TO MODE 3 * anita tii 

7579 037676 005267 137670 INC MMRO ;TURN ON MEMORY MANAGEMENT 

7580 037702 170567 060052 TSTF DATA TESTING BLOCK 21-0. 

7581 027706 170467 060046 CLRF DATA ZTESTING BLOCKS 27-DD, 27-T AND 27-R. 

7582 037712 177067 060042 LDCIF DATA,ACO STESTING BLOCKS 28-T, 28-N ADN 28-P. 

7583 037716 172467 060036 LDF DATA,ACO ZTESTING BLOCKS 4-DD. 4-T, 4-X, 4-2 AND 4-88. 
7584 037722 170367 060032 STST DATA TESTING BLOCKS 33-T, 33-N AN D 33-P. 


7585 037726 005067 137640 CLR MMRO TURN OFF MEMORY MANAGEMEN 
7586 -ENABL AMA SREENABLE MODE 6 TO MODE " CONVERSION 





7587 


037732 
7588 037734 
7589 037740 
7590 037742 
7591 027746 
7592 037752 
7593 037756 
7594 037762 
7595 037766 
7596 037772 
7597 037776 
7598 040002 
7599 


7600 040006 


000431 


CKFPCCO FRIIF FLTG PNT PRT C 
TEST # 104 = ENABLE D=SPACE & SEE I-SPACE FORCED, MODE 


~ SBTTL 


177572 


177572 


E 15 
MACRO M1113  09=APR=81 a PAGE 79 


SEQUENCE 


TEST # 104 = ENABLE D=SPACE & SEE I-SPACE FORCED, MODE 7 


2 RRR AERE ERE EEE EEA EEE EAE EEE REET ERE EEEEEH 


ee ee ee ee ee ee ee ee ee ee ee | 
aeneeepeerpeeee 


o 
* 


TEST 104 


ENABLE D=SPACE & SEE I-SPACE FORCED, MODE 7 


THIS IS A TEST THAT WILL ENARLE D=SPACE AND MAKE IT RESIDENT SO THAT AN 
INSTRUCTION THAT ACCESSES I=SPACE WHEN IT NORMALLY SHOULDN'T WILL CAUSE A 
MEMORY MANAGEMENT TRAP/ABORT. 

s**eALL REFERENCES TO MICRO-FLOWS REFER TC *FP11-F-2 REV A* FLOWS***** 

THE COMMENTS FOR EACH TEST LINE ARE WRITTEN SO YOU CAN GO TO THE MICRO FLOWS 
AND PINPOINT THE PROBLEM AREA. FROM THERE, HARDWARE ANALYSIS SHOULD BE EASIER. 
INSTRUCTION GROUPS ISOLATED BY BLANK LINES ARE TO BE EXECUTED TOGETHER 

DUE TO PROPER SETUP PURPOSES. I.E. THE LOCATION OR ADDRESS HAS TO BE 
INITIALIZED PROPERLY BEFORE THE INSTRUCTION CAN BE ACCOMPLISHED. 


MRA AERRRRSERSSSSSSRS ES ESRSESE SESS R SRR R RSE R ARR ESAS ARR SSSR S RARE SS DS 


151104: SCOPE 
INC 


MMRO ;TURN ON MEMORY MANAGEMENT. 
MOV R2,RO SETTING UP RO. 
CL WF @0(RO) ZTESTING BLOCKS 27-GG, 27=-JJ, 27=T AND 27-R. 
CLRF @DATA+10 
LDCIF @a0(RO),ACG TESTING BLOCKS 28-W, 28-Z, 28-N AND 28-P. 
LDOCIF a@DATA+10,ACO 
LDF @0(RO) ,ACO TESTING BLOCKS 4-GG, 4-JJ, 4-T, 4-X 4-2 AND 4-88. 
LDF @DATA+10,AC 
STST a@0(RO) ZTESTING BLOCKS 33-W, 33-Z, 33-N AN 33-P. 
STST QaDATA+10 


CLR MMRO ; TURN OFF MEMORY MANAGEMENT. 
BR ENDTST ;BRANCH TO ENG OF TEST ROUTINE. 


186 


CKFPCCO FRIIF FLTG PNT PRT C 
TRAP HANDLER FOR UNEXPECTED MEMORY MANAGEMENT ABORTS 


7601 . SBITL 
7602 040010 042737 000001 177572 TRAPV: BIC 
7603 040016 013737 177572 001240 MOV 
7604 040024 005237 001240 INC 
7605 040030 013737 177576 001236 MOV 
7606 040036 005037 177572 CLR 
7607 040042 012637 001266 MOV 
7608 040046 012637 001270 MOV 
7609 040052 104362 ERROR 
7610 040054 013746 001270 MOV 
7611 040060 613746 001266 MOV 
7612 040064 005237 17757¢ INC 
7613 040070 000002 RT] 


F 15 
MACRO M1113 O9=-APR=81 13:53 PAGE 80 


SEQUENCE 187 


nh HANDLER FOP Vee ee MEMORY fag A ABORTS 


RO, $TMP3 


$TMPS 
MMR2 ,STMP2 
MMR 


(SP)+,$TMP16 
(SP)+,$TMP17 
+362 
$TMP17,-(SP) 
$TMP16,-(SP) 
MMRO 


URN OFF MEMORY MANAGEMEN 
‘TRANSFER MMRO TO $TMP3 FOR’ ERROR PRINTING. 
:REPLACE BIT CLEARED TURNING OFF MEMORY MANAGEMENT. 
MOVE THE TRAP INSTRUCTION ADDRESS TO $TMP13. 
;CLEAR ERROR BITS. 


[POP STACK AND SAVE 1ST CONTENTS. 

3;POP STACK AGAIN AND SAVE 2ND CONTENTS. 
;FPP TRAP/ABORT ERROR CALL. 

;PUSH 2ND SAVED CONTENTS BACK ON STACK. 
7PUSH 1ST SAVED CONTENTS BACK ON STACK. 
; TURN ON MEMORY MANAGEMENT. 

RETURN FROM INTERRUPT. 


CKFPCCO FRIIF FLTG PNT PRT C 
TRAP HANDLER FOR UNEXPECTED MEMORY MANAGEMENT ABORTS 


7614 040072 
7615 060076 
7616 040104 

040104 


7617 040106 


7635 040222 
7637 040226 
7638 040234 
7639 040242 
7640 040250 
7641 040256 


7643 040264 


7653 040350 
7655 040356 

040362 
7657 040370 
7658 040376 
7659 040404 


7661 040412 


7665 040440 


005037 
013737 


104412 


005037 


174237 
174337 


012737 


012737 
012737 


012737 
005037 


177572 
001262 


000030 


043014 
043024 
043034 
043044 


077406 


077406 
077406 


077406 
172360 


177600 
172340 


177600 
043074 


G 15 
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000250 


043014 


043022 


040522 


ENDTST: CLR 
MOV 


RSETUP 


1$: CLR 


MMRO 
$TMP14,MMVECT 


MMRO 
#40000 
$TMP20 
#252,STORE 


712558), STORE +2 
#125252. STORE +4 
#125252. STORE +6 


STORE ,ACO 
STORE ,AC1 
STORE ,AC2 
STORE ,AC3 
ASTORE ,RO 
#30,R1 

(RO) + 

R1,1$ 
ACO,STORE 
AC1,STORE+10 
AC2,STORE+20 
AC3,STORE +30 


#77406, KDPDRO 
#77406,KDPDR1 
#77400, KDPDR2 
#77406, KDPDR3 
477406, KDPDR7 


#77406, KIPDRO 
4#77406,KIPDR1 
#77406,KIPDR2 
#77406, KIPDR3 
#77406,KIPDR7 


KDPARO 

#200, KDPAR1 
#400, a se 
#600 ,KDPAR3 
4577600, KDPAR? 


KIPARO 
#200,KIPAR1 
#400,KIPAR2 
#600, KIPAR3 
#177600, KIPAR7 


#BYTABL ,R5S 
MMVECT,$TMP14 
#TRPY ,MMVECT 
#340 MMVECT+2 
IOTRAP, SAVIOT 


3 TURN OFF MEMORY MANAGEMENT. 
RESTORE MMVECT TO ITS ORIGINAL CONTENTS. 


3GO INITIALIZE THE FPS AND STACK; 
;SEE IF THE USER HAS EXPRESSED 
TO CHANGE THE SOF TWARE 


STHE DESIRE 


AND 


ZVIRTUAL CONSOLE SWITCH REGISTER (HAS 


; THE USER TYPED CONTROL G?). 


[MAKE SURE MEMORY MANAGEMENT IS OFF. 


;LOAD FLOATING POINT STATUS. 

;CLEAR THE TEMPORARY LOCATION. 

;CLEAR UPPER BYTE - ALTERNATING BITS IN LOWER BYTE. 
:MOVE ALTERNATING BITS TO 2ND WORD. 

;MOVE ALTERNATING BITS TO 3RD WORD. 


MOVE ee BITS TO 4TH WORD. 


MOVE ADDRESS OF STORE TO RO. 
MOVE LOOP COUNTER (CLEARING 30 WORDS) TO R1. 
>CLEAR THE WORD. 


;SUBTRACT 1 FROM k1 AND BRANCH IF NOT Q. 


STORE ACO. 
SSTORE AC1. 
STORE AC2. 
STORE AC3. 


MAKE KDPDRO RESIDENT. 


sMAKE KDPDR1 
sMAKE KDPDR2 
sMAKE KDPDR3 
sMAKE KDPDR7 


MAKE KIPDRO 
MAKE KIPDR1 
3;MAKE KIPDR2 
MAKE KIPDR3 
MAKE KIPDR7 


zMAP D-PAGE 
sMAP D-PAGE 
sMAP D-PAGE 
ZMAP D=-PAGE 
;MAP D-PAGE 


:MAP I-PAGE 
I-PAGE 
;MAP I-PAGE 
I -PAGE 
I-PAGE 


SET UP BYTE TABLE POINTER R5. 


NWN HO NWN oO 


RESIDENT. 
NON-RESIDENT. 
RESIDENT. 
RESIDENT. 


RESIDENT. 
RESIDENT. 
RESIDENT. 
RESIDENT. 
RESIDENT. 


FOR 12-16K. 
FOR I/O PAGE. 


TEMPORARILY STORE THE MMVECT VALUE. 


:SET UP FOR FP TRAPS FOR THIS TEST. 
3STORE THE IOTRAP VALUE IN SAVIO? 


SEQUENCE 


188 


H 15 
CKFPCCO FRIIF FLTG PNT PRT C MACRO M1113 O9=APR=81 13:53 PAGE 81-1 SEQUENCE 189 
TRAP HANDLER FOR UNEXPECTED MEMORY MANAGEMENT ABORTS 


— 040446 012737 000340 000022 MOV #340, 10TRAP+2 

7668 060654 012737 000024 172516 MOV #24 ,MMR3 TURN ON 22-BIT KERNEL D=SPACE. 
7669 040462 012737 043000 043010 MOV #NODAT,NODAT*+10 ;SET UP ADDRESS POINTER. 

7670 040470 012700 043000 MOV #NODAT ,RO SET UP RO. 

7671 040474 012702 043010 MOV #NODAT+10,R2 SET UP Re. 

7672 040500 012703 043012 MOV #NODAT+12,R3 SET UP R3. 

7673 040504 010037 043054 MOV RO, STORE +40 STORE RQ. 

7674 040510 010237 043056 MOV R2,STORE +42 iSTORE Re. 

7675 040514 010337 043060 MOV R3,STORE+44 STORE R3. 

ey 040520 000401 BR TST105 BRANCH OVER LOCATION SAVIOT 
7678 040522 000000 SAVIOT: .WwORD 0 LOCATION TO SAVE THE SCOPE VECTOR ADDRESS 


15 
CKFPCCO FRIIF FLTG PNT PRT C MACRO M1113 ee 13:53 PAGE 82 SEQUENCE 


TEST # 105 = AUTO INCREMENT/DECREMENT TEST, MOD 
7691 -SBTTL TEST # 105 = AUTO INCREMENT/DECREMENT TEST, MODE 0 


RPO SEAS RRSRERSSSSALASRS ARR SAS SSSR RRR SRE RRR RRR RRR R RRR RRR SSSR SDD Bs 


:sTEST 105 AUTO INCREMENT/DECREMENT TEST, MODE 0 


:* THIS TEST INSURES THAT AUTO INCREMENT/DECREMENT WORKS PROPERLY AND 

;* *ONLY* WHEN IT IS SUPPOSED TO. THIS IS DONE BY ENABLING 22-BIT KERNEL 
;* D=-SPACE, BUT MAKING IT NON-RESIDENT, FORCING A MEMORY MANAGEMENT TRAP 
:* CONDITION. THIS ENABLES EXAMINING OF SR1 FOR PROPER CONTENTS. 


haan hae oe 


;*e*eeALL REFERENCES TO MICRO=FLOWS REFER TO *FP11-F=2 REV A® FLOWS***** 
;* THE COMMENTS FOR EACH TEST LINE ARE WRITTEN SO YOU CAN GO TO THE MICRO 
;* FLOW AND PINPOINT THE PROBLEM AREA. 


FROM THERE, HARDWARE ANALYSIS SHOULD 


:* BE EASIER. 
Z S saseiceednaiodlcedeshiabain ioc erates neato daha ath aca talicetlh tela tai ceeihieiie hina 
040524 000004 $1105: SCOPE 
| 7692 040526 $: 
| aegs Onrse 104413 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
| 
| 769% ;* THE FOLLOWING TESTS ARE FOR MODE 0 REG 1 (THESE SHOULD *NOT* ABORT). 
76% 040530 012737 041570 060020 MOV #FALTRP,IOTRAP;SET UP FOR FAILURE OF TRAPS FOR THIS TEST. 
7697 040536 005237 177572 INC MMRO ; TURN ON MEMORY MANAGEMENT. 
7698 040542 170501 TSTF RY ZFDST=NOTCLR PAGE 21. 
7699 040544 170401 CLRF RI :FDST MODES PAGE 27. 
7700 040546 177001 LDCIF R1,ACO :SQURCE MODES PAGE 28. 
7701 040550 172401 LDF R1.ACO SFSRC MODES PAGE 4 
7702 040552 170301 STST RT :DEST MODES PAGE 33. 
7703 040554 005037 177572 CLR MMRO :TURN OFF MEMORY MANAGEMENT. 
7704 040560 172437 043014 LDF STORE .ACO RESTORE ACO. 
7705 040564 172537 043014 LDF STORE ,AC1 ZRESTORE AC1. 
7706 040570 010046 MOV RO,-(SP) ZSAVE RO FOR NEXT TEST 
7707 040572 010246 MOV R2.—(SP) SSAVE R2 FOR NEXT TEST 
7708 040574 013737 040522 000020 MOV SAVIOT,IOTRAP RESTORE SCOPE TRAP VECTOR 


+ CKFPCCO FRIIF FLTG PNT PRT C 


15 
MACRO M1113 oe 13:53 PAGE 83 


SEQUENCE 


TEST # 106 = AUTO INCREMENT/DECREMENT TEST, MODE 


7709 


040602 000004 
7710 040604 012602 
7711 040606 012600 
7712 040610 012737 041570 000020 
7713 040616 005237 177572 
7714 040622 010001 
7715 040624 010004 


900004 
7726 040652 geo 177572 


0246 
7729 040662 013737 040522 o0002¢ 


.SBTTL TEST # 106 = AUTO INCREMENT/DECREMENT TEST, MODE 1 


CPP ReSAERSASASASSSE SERRA SRSA RSSARARRS SRSA RRRR RRR RR RRR SASS ESRD DD DS 


;*TEST 106 AUTO INCREMENT/DECREMENT TEST, MODE 1 


:* THIS TEST INSURES THAT AUTO INCREMENT/DECREMENT WORKS PROPERLY AND 

7* *ONLY* WHEN IT IS SUPPOSED TO. THIS IS DONE BY ENABLING 22-BIT KERNEL 

3* D-SPACE, BUT MAKING IT NON-RESIDENT, FORCING A MEMORY MANAGEMENT TRAP 

:* CONDITION. THIS ENABLES EXAMINING OF SR1 FOR PROPER CONTENTS. 

p****ALL REFERENCES TO MICRO-FLOWS REFER TO *FP11-F-2 REV A® FLOWS***** 

z* THE COMMENTS FOR EACH TEST LINE ARE WRITTEN SO YOU CAN GO TO THE MICRO 

3* FLOW AND PINPOINT THE PROBLEM AREA. FROM THERE, HARDWARE ANALYSIS SHOULD 
- BE EASIER. 

TS 


3 PPR EeSSSSSE SESE RE SERS SRR SE RRR ESR RRR RR RASA RRR RRR SRS RRR RRS RR RRS SS DS 


7106: SCOPE 


MOV (SP)+,R2 RESTORE R2 FOR THIS TEST 

MOV (SP)+,RO RESTORE RO FOR THIS TEST 

MOV #FALTRP, IOTRAP; séT UP FOR FAILURE OF ana Biber THIS TEST. 

INC MMRO TURN ON MEMORY MANAGEMEN 
MODE1: MOV RO,R1 :SET UP R1. 

MOV RO,R4 MOVE "START" VALUE INTO R4. 

TSTF (R1) As Mae ab PAGE 21. 

10T sFORCE A TRAP. 

CLRF (R1) FDST as PAGE 27. 

10T [FORCE A TRAP. 

LDCIF (R1),ACO ; SOURCE a Fae PAGE 28. 

IOT :FORCE A TRAP. 

LDF (R1),ACO iF SRC oe PAGE 4. 

107 sFORCE A TRAP. 

STST (R1) :DEST MODES PAGE 33. 

107 :FORCE A TRAP. 

CLR MMRO TURN OFF I’ “MORY MANAGEMENT. 


MOV RO,-(SP) 
MOV RZ,-(SP) 
MOV SAVIO’, IOTRAP 


ZSAVE RO FOR NEXT TEST 
SAVE R2 FOR NEXT TEST 
RESTORE SCOPE TRAP VECTOR 


191 


15 
CKFPCCO FRIIF FLTG PNT PRT C MACRO M1113 O9-APR=81 13:53 PAGE Be 
TEST # 107 = AUTO INCREMENT/DECREMENT TEST, MODE 2 


7730 .SBTTL TEST # 107 = AUTO INCREMENT/DECREMENT TEST, MODE 2 


RRS RAREAE RARE EAE EEE EAREKERRER EEE 


:*TEST 107 AUTO INCREMENT/DECREMENT TEST, MODE 2 


ce THIS TEST INSURES THAT AUTO INCREMENT/DECREMENT WORKS PROPERLY AND 

;* *ONLY* WHEN IT IS SUPPOSED TO. THIS IS DONE BY ENABLING 22-BIT KERNEL 

7* D-SPACE, BUT MAKING IT NON-RESIDENT, FORCING A MEMORY MANAGEMENT TRAP 

>* CONDITION. THIS ENABLES EXAMINING OF SR1 FOR PROPER CONTENTS. 

p***eeALL REFERENCES TO MICRO=FLOWS REFER TO *FP11-F=2 REV Ax FLOWS***** 

>* THE COMMENTS FOR EACH TEST LINE ARE WRITTEN SO YOU CAN GO TO THE MICRO 

7* FLOW AND PINPOINT THE PROBLEM AREA. FROM THERE, HARDWARE ANALYSIS SHOULD 
TS 


SEQUENCE 192 





| :* BE EASIER. 
bd = —histtlinitistadstetaaniadiitieaamaneditniitditanniiiaaeiinad dbampeanneanenetinesiimell 
| 040670 00000 T1107: SCOPE 
7731 040672 012737 041570 000020 MOV #FALTRP, IOTRAP; SET UP FOR FAILURE OF TRAPS FOR THIS TEST. 
7732 040700 01260 MOV (SP)+,R2 :RESTORE R2 FOR THIS TEST 
7733 040702 01260 MOV (SP)+,RC “RESTORE RO FOR THIS TEST 
7734 040704 005237 177572 INC MRO [TURN ON MEMORY MANAGEMENT. 
7735 040710 17052 TSTF ss (R1) 4 =FDST-NOTCLR PAGE 21. 
7736 040712 000004 LABEL1: I0T [FORCE A TRAP. 
7738 040714 6010001 MoV RO,R1 ZCORRECT R1. 
7739 060716 170421 CLRF (Ri) + =FDST MODES PAGE 27. 
7740 040720 000004 I0T [FORCE A TRAP. 
7742 040722 010001 MOV RO,R1 :CORRECT R1. 
7743 040724 177021 LDCIF (R1)+,ACO [SOURCE MODES PAGE 28. 
7744 040726 000004 oT [FORCE A TRAP. 
7746 040730 010001 MoV RO,R1 :CORRECT R1. 
7747 040732 172421 LDF (R4)+,ACO =FSRC MODES PAGE 4. 
7748 040734 000004 i0T [FORCE A TRAP. 
7750 040736 010001 MOV RO,R1 :CORRECT R1. 
7751 040740 170321 STST (Ri) + SDEST MODES PAGE 33. 
7752 040742 00000 10T :FORCE A TRAP. 
7753 040744 005037 177572 CLR MRO “TURN OFF MEMORY MANAGEMENT. 
7754 040750 013737 040522 000020 MOV SAVIOT,IOTRAP RESTORE SCOPE TRAP VECTOR 
7755 040756 010046 MOV RO,-(SP) SAVE RO FOR NEXT TEST 
7756 040760 610246 MOV Re, ~(SP) “SAVE R2 FOR NEXT TEST 


CKFPCCO FPTTF FLTG PNT PRT C 


L_15 
MACRO M1113 eo 13:53 PAGE BS 


SEQUENCE 


| TEST # 110 = AUTO INCREMENT/DECREMENT TEST, MODE 


7757 


7779 041046 
7781 041050 


170431 


010201 
177031 


000004 
177037 
000004 


010201 
172431 
000004 
172437 
000004 


010201 
170331 
000004 


013737 


041570 000020 


177572 


043000 


043000 


043000 


043000 


043000 
177572 


040522 000020 


- SBTTL 


TEST # 110 = AUTO INCREMENT/DECREMENT TEST, MODE 3 


FFARR AEEEREREERERETEEREKEREEAERRAEKE RARER ERRARAKAAEKRAREEERE 


— Anne ran ee 


2 *TEST 110 AUTO INCREMENT/DECREMENT TEST, MODE 3 


:* THIS TEST INSURES THAT AUTO INCREMENT/DECREMENT WORKS PROPERLY AND 

;* *ONLY* WHEN IT IS SUPPOSED TO. THIS IS DONE BY ENABLING 22-BIT KERNEL 

;* D=-SPACE, BUT MAKING IT NON-RESIDENT, FORCING A MEMORY MANAGEMENT TRAP 

:* CONDITION. THIS ENABLES EXAMINING OF SR1 FOR PROPER CONTENTS. 

;exeeeALL REFERENCES TO MICRO=FLOWS REFER TO *FP11-F=2 REV A* FLOWS***** 

;* THE COMMENTS FOR EACH TEST LINE ARE WRITTEN SO YOU CAN GO TO THE MICRO 

;* FLOW AND PINPOINT THE PROBLEM AREA. FROM THERE, HARDWARE ANALYSIS SHOULD 


:* BE EASIER. 
» PeEaheneonssneeenneseeeonsteennetmeNnENeNneReesonenanEENTene 
$1110: SCOPE 
MOV #FALTRP, IOTRAP;SET UP FOR FAILURE OF TRAPS FOR THIS TEST. 
MCV (SP)+,R2 ;RESTORE R2 FOR THIS TEST 
MOV (SP) +.RO ZRESTORE RO FOR THIS TEST 
INC MMRO [TURN ON MEMORY MANAGEMENT. 
MOV R2.R1 [SET UP R1 FOR MODE 3. 
MOV R2,R4 “MOVE 'START' VALUE INTO 24. 
TSTF = @(R1) + ZFDST-NOTCLR PAGE 21. 
10T [FORCE A TRAP. 
TSTF  NODAT 
10T :FORCE A TRAP. 
MOV R2,R1 :CORRECT R1. 
CLRF  a(R1)+ :FDST MODES PAGE 27. 
I0T [FORCE A TRAP. 
CLRF  NODAT 
10T :FORCE A TRAP. 
MOV R2,R1 :CORRECT R1. 
LDCIF aiR1)+,ACO [SOURCE MODES PAGE 28. 
107 :FORCE A TRAP. 
LDCIF | NODAT,ACO 
10T :FORCE A TRAP. 
MOV R2,R1 : CORRECT R1. 
LDF a(R1)+,ACO :FSRC MODES PAGE 4. 
10T :FORCE A TRAP. 
LDF NODAT ACO 
10T ;FORCE A TRAP. 
MOV R2,R1 :CORRECT R1. 
STST a(R1)+ :DEST MODES PAGE 33. 
10T [FORCE A TRAP. 
STST | NODAT 
10T ;FORCE A TRAP. 
CLR MMRO [TURN OFF MEMORY MANAGEMENT. 
MOV RO,-(SP) TSAVE RO FOR NEXT TEST 
MOV R2.-(SP) SSAVE R2 FOR NEXT TEST 
MOV SAVIOT,IOTRAP :RESTORE SCOPE TRAP VECTOR 


193 


| CKFPCCO FRIIF FLTG PNT PRT C 
TEST # 111 = AUTO INCREMENT/DECREMENT TEST, 


7796 


41116 


7803 041142 
7805 041144 


7823 041204 


000004 


Risen 041570 000020 


177572 


010201 
170441 
000004 


010201 
177041 
000004 
010201 
172441 
000004 


010201 
170341 


177572 


010246 
013737 040522 000020 


a. 2 a ae eae oe 


M 15 
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» SBTTL 


SEQUENCE 


TEST # 117 = AUTO INCREMENT/DECREMENT TEST, MODE 4 


MARRBABRSSASAR ER SAARASASRRASAARRSREESASASASASASSRSAR SSSR SARS SSS SSS S| 


:*TEST 111 


;* *ONLY* WHEN IT IS SUPPOSED TO. THIS IS DONE 


AUTO INCREMENT/DECREMENT TEST, MODE 4 
:* THIS TEST INSURES THAT AUTO INCREMENT/DECREMENT WORKS PROPERLY AND 


BY ENABLING 22-BIT KERNEL 


;* D=-SPACE, BUT MAKING IT NON-RESIDENT, FORCING A MEMORY MANAGEMENT TRAP 
THIS ENABLES EXAMINING OF SR1 FOR PROPER CONTENTS. 


:* CONDITION. 


;*eeeeALL REFERENCES TO MICRO=-FLOWS REFER TO *FP11-F=2 REV A® FLOWS***** 
;* THE COMMENTS FOR EACH TEST LINE ARE WRITTEN SO YOU CAN GO TO THE MICRO 


;* FLOW AND PINPOINT THE PROBLEM AREA. 


;* = EASIER. 


Mase a RASA SASESAASARSAAARRRASRSASASSASR SAR RRA RA SRR R RAR RR SERS SS SD | 


ST111: 


SCOPE 


FROM THERE, HARDWARE ANALYSIS SHOULD 


ww mr let vent FOR FAILURE OF TRAPS FOR THIS TEST. 


(SP) + 
(SP)+,RC 
MMRO 


R2,R1 
-(R1) 


R2,R1 
-(R1) 


R2,R1 
-(R1) ,ACO 


R2,R1 
-(R1),ACO 


R2,R1 
-(R1) 


MMRO 
ga ti 


cavl0T. TOTRAP 


R2 FOR THIS TEST 


RESTORE RO FOR THIS TEST 
;TURN ON MEMORY MANAGEMENT. 
;SET UP R1 FOR MODE 4. 
FDST-NOTCLR PAGE 21. 
sFORCE A TRAP. 


CORRECT R1. 
3FDST MODES PAGE 27. 
sFORCE A TRAP. 


CORRECT R1. 
SOURCE MODES PAGE 28. 
:FORCE A TRAP. 


CORRECT R1. 
:FSRC MODES PAGE 4. 
sFORCE A TRAP. 


;CORRECT R1. 


:DEST mee PAGE 33. 
:FORCE A TRAP. 

; TURN OFF MEMORY MANAGEMENT. 
[SAVE RO FOR NEXT TEST 

ZSAVE R2 FOR NEXT TEST 


SRESTORE SCOPE TRAP VECTOR 


_CKEPCCO FPITIF FLTG PNT PRT C 


# 112 = AUTO INCREMENT /DECREMENT TEST, MODE 5 


7824 


041212 
7825 041214 
7826 041222 


7831 041236 
7832 041240 
7833 

7834 041242 
7835 041244 
7836 041246 
7837 

7838 041250 


7839 041252 
7840 041254 
7841 


7842 041256 
7843 041260 
7844 041262 
7845 


7846 041264 


7850 041276 


000004 
BiSeho 041570 000020 


177572 


010301 
170451 
000004 


010301 
177051 
000004 


010301 
172451 
000004 


010301 

170351 

000004 

005037 177572 

613737 040522 000020 


.SBTTL 


N15 
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SEQUENCE 


TEST # 112 = AUIO INCREMENT/DECREMENT TEST, MODE 5 


STREAK ERE EERE RERREEREREREREKEEEERERE EERE ERER EEE 


AUTO INCREMENT/DECREMENT TEST, MODE 5 
:* THIS TEST INSURES THAT AUTO INCREMENT/DECREMENT WORKS PROPERLY AND 


te Be Be Be Be Be Be Be Be Be 


Wee 


7* 


;* *ONLY* WHEN IT IS SUPPOSED TO. THIS IS 
;* D-SPACE, BUT MAKING IT NON-RESIDENT, 
THIS ENABLES 


-* 


=Test 112 


CONDITION. 


DONE BY ENABLING 22-BIT KERNEL 
FORCING A MEMORY MANAGEMENT TRAP 


EXAMINING OF SR1 FOR PROPER CONTENTS. 
;eeeeeALL REFERENCES TO MICRO=FLOWS REFER TO *FP11-F=2 REV A* FLOWS***** 


;* THE COMMENTS FOR EACH TEST LINE ARE WRITTEN SO YOU CAN GO TO THE MICRO 


;* FLOW AND PINPOINT THE PROBLEM AREA. 


** 


* 


BE EASIER. 


FROM THERE, HARDWARE ANALYSIS SHOULD 


mittee eRe eee EAEAREERRRRRRAR ASSESS ALERS SSSR RSS SR RRR RRS SS SRS SSE SG 


T112: SCOPE 


hea proc age SET UP FOR FAILURE OF TRAPS FOR THIS TEST. 


(SP) + 
(SP)+,RC 
MMRO 


R3,R1 
a-(R1),ACO 
R3,R1 
a-(R1),ACO 


R3,R1 
a-(R1) 


MMRO 
SAVIOT, IOTRAP 


RESTORE R2 FOR THIS TEST 
SRESTORE RO FOR THIS TEST 
: TURN ON MEMORY MANAGEMENT. 
;SET UP R1 FOR MODE 5. 
sMOVE ‘START’ VALUE INTO R4. 
3FDST=-NOTCLR PAGE 21. 
sFORCE A TRAP. 


;CORRECT R1. 
7FDST a. PAGE 27. 
SFORCE A TRAP. 


; CORRECT R1. 
;SOURCE MODES PAGE 28. 
sFORCE A TRAP. 


CORRECT R1. 
sFSRC_ MODES PAGE 4. 
sFORCE A TRAP. 


CORRECT R1. 

:DEST —. PAGE 33. 
sFORCE A TRAP. 
TURN OFF MEMORY MANAGEMENT. 
“RESTORE SCOPE TRAP VECTOR 
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B 16 
“ CKFPCCO FP1IF FLTG PNT PRT C MACRO M1113 O9-APR=-81 13:53 PAGE 88 SEQUENCE 
_ TEST # 113 = AUTO INCREMENT/DECREMENT TEST, MODE 6 


7851 -SBTTi. TEST # 113 = AUTO INCREMENT/DECREMENT TEST, MODE 6 


RRR EPORAAKEREREREREEHEREEREEEEED 


as 
tyes 113 AUTO INCREMENT/DECREMENT TEST, MODE 6 


:* THIS TEST INSURES THAT AUTO INCREMENT/DECREMENT WORKS PROPERLY AND 

[* *ONLY* WHEN IT IS SUPPOSED TO. THIS IS DONE BY ENABLING 22-B1T KERNEL 

:* D=SPACE, BUT MAKING IT NON-RESIDENT, FORCING A MEMORY MANAGEMENT TRAP 

:* CONDITION. THIS ENABLES EXAMINING OF SR1 FOR PROPER CONTENTS. 

peeeeeALL REFERENCES TO MICRO=FLOWS REFER TO *FP1i-F=2 REV A® FLOWS***#* 

3* THE COMMENTS FOR EACH TEST LINE ARE WRITTEN SO YOU CAN GO TO THE MICRO 

ie og oe Agena THE PROBLEM AREA. FROM THERE, HARDWARE ANALYSIS SHOULD 
22 


TOP RSEPSESESELE SES LE SEER SER SEER RRR REARS RRR RRR RRR RRS RRR RRR RR SSDS SS 


041304 000004 TST113: SCOPE 
7852 -DSABL AMA DISABLE MODE 6 TO MODE 3 CONVERSIONS 
7853 041306 012767 041570 136504 MOV #FALTRP, IOTRAP; SET UP FOR FAILURE OF TRAPS FOR THIS TEST. 
7854 041314 010301 MOV R3,R1 SET UP R1 FOR MODE 6. 
7855 041316 010304 MOV R3,R4 ;MOVE *START' VALUE INTO R4. 
7856 041320 005267 136246 INC MMRO TURN ON MEMORY MANAGEMENT. 
7857 041324 170561 000000 TSTF 0(R1) SFDST-NOTCLR PAGE 21. 
7858 041330 000004 IOT FORCE A TRAP. 
7859 041332 170567 901442 TSTF NODAT 
7860 041336 000004 IOT FORCE A TRAP. 
041340 170461 000000 CLRF O(R1) ZF DST nae PAGE 27. 
041344 000004 IOT FORCE A TRAP. 
041346 170467 001426 CLRF NODAT 
7864 041352 000004 107 7FORCE A TRAP. 
7865 041354 177061 000000 LDCIF O(R1),ACO ; SOURCE 44 PAGE 28. 
7 041360 000004 IOT sFORCE A TRAP 
7867 041362 177067 001412 LDCIF §NODAT,ACO 
7868 041366 000004 IOT sFORCE A TRAP. 
7869 041370 172461 000000 LDF 0(R1),ACO zsFSRC MODES PAGE 4. 
7870 041374 000004 IOT sFORCFE A TRAP. 
7871 041376 172467 001376 LDF NODAT ,ACO 
7872 041402 000004 1OT sFORCE A TRAP. 
7873 041404 170361 000000 STST O(R1) DEST MODES PAGE 33. 
7874 041410 000004 IOT FORCE A TRAP. 
7875 041412 170367 001362 STST NODAT 
7876 041416 000004 IOT FORCE A TRAP, 
7877 041420 005067 136146 CLR “pee ; TURN OFF MEMORY MANAGEMENT. 
7878 041424 010246 MOV R2.* TSAVE R2 FOR NEXT TEST 
7879 041426 016767 177070 136364 MOV Sav 10r, TOTRAP TRESTORE SCOPE TRAP VEC 
7880 -ENABL AMA ;REENABLE MODE 6 TO MODE % CONVERSIONS 
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CKFPCCO FRIIF FLTG PNT PRT C 


TEST # 114 = AUTO INCREMENT/DECREMENT TEST, MODE 


7881 


790 
7908 041556 
7909 041564 


. SBTTL 


C 16 
MACRO M1113 1s tla 13:53 PAGE 89 


SEQUENCE 


TEST # 114 = AUTO INCREMENT/DECREMENT TEST, MODE 7 


TORRE RE SESSRRRRSSS SEE ER ERE RARER EASA RARER ARRAS RRR RRR RRR RRR S ARES SD OS 


AUTO INCREMENT/DECREMENT TEST, MODE 7 


:* THIS TEST INSURES THAT AUTO INCREMENT/DECREMENT WORKS PROPERLY AND 
:* *ONLY* WHEN IT IS SUPPOSED TO. THIS IS DONE BY ENABLING 22-B1T KERNEL 
>* D=SPACE, BUT MAKING IT NON-RESIDENT, FORCING A MEMORY MANAGEMENT TRAP 


estes! 114 


:* CONDITION. 


THIS ENABLES EXAMINING OF SR1 FOR PROPER CONTENTS. 


pe*eeeALL REFERENCES TO MICRO=FLOWS REFER TO *FP11-F=-2 REV A® FLOWS***#* 
7* THE COMMENTS FOR EACH TEST LINE ARE WRITTEN SO YOU CAN GO TO THE MICRO 


:* FLOW AND PINPOINT THE PROBLEM AREA. 


FROM THERE, HARDWARE ANALYSIS SHOULD 


° —cisidiniiivisinsnditeamandenaiinaleinaieianiatnaaiteinaamedtabii amiatiaitidiebaniainniaeil 


is * BE EASIER. 
TST114: SCOPE 
041570 000020 MOV 
MOV 
177572 INC 
MOV 
MOV 
000000 TSTF 
IOT 
001320 TSTF 
IOT 
000000 CLRF 
10T 
001304 a 
000000 LDCIF 
IOT 
001270 LDCIF 
IOT 
000000 LDF 
IOT 
001254 LDF 
IOT 
000000 STST 
I0T 
001240 STST 
10T 
177572 CLR 
040522 000020 MOV 
043160 JMP 


Co a mem wr aetrone FOR FAILURE OF TRAPS FOR THIS TEST. 


(SP)+,R 
0 


a0(R1) 

@NODAT +10 
@0(R1) 

@NODAT +10 
a0(R1) ,ACO 
@NODAT+10,ACO 
a@0(R1),ACO 
@NODAT+10,ACO 
a0(R1) 

@NODAT +10 


MMP 0) 
SAVIOT, IOTRAP 
ENDTES 


R2 FOR THIS TEST 
; TURN ON MEMORY MANAGEMENT. 


7SET UP R1 FOR MODE 7. 
sMOVE 
3FDST-NOTCLR PAGE 21. 
FORCE A TRAP. 


;FORCE A TRAP. 
3FDST MODES PAGE 27. 
FORCE A TRAP. 


*START’ VALUE TO R4. 


sFORCE AT 
3 SOURCE MODES” PAGE 28. 
SFORCE A TRAP. 


sFORCE A TRAP. 
zFSRC MODES PAGE 4. 
sFORCE A 


TRAP. 


sFORCE A TRAP. 
DEST — PAGE 33. 
>FORCE A TRAP. 


FORCE A TRAP. 

TURN OFF MEMORY MANAGEMENT. 
RESTORE SCOPE TRAP VECTOR 

; JUMP TO END TEST. 
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D 16 
KFPCCO FPIIF FLTG PNT PRT C MACRO M1113 pled 13:53 PAGE 30 SEQUENCE 
ST # 114 = AUTO INCREMENT/DECREMENT TEST, 
7910 041570 005037 177572 FALTRP: CLR MMRO 3; TURN OFF MEMORY MANAGEMENT. 
ia ag 041574 011637 001260 MOV (SP) ,$TMP13 ZMOVE NEXT''INSTRUCTION ADDRESS TO $TMP13. 
7913 3THIS NEXT SECTION NOW CORRECTS THE CONTENTS OF $TMP13 SO THAT IT POINTS 
7914 >TO THE PREVIOUS FPP INSTRUCTION. IT DOES THIS BY SUBTRACTING 2 FROM THE 
7915 TADDRESS IN $TMP13, REPLACING THE a nae THAT THE BIC_ INSTRUCTION USES, 
7916 ZAND BIT CLEARING THE INSTRUCTION WITH 170000. IF THE INSTRUCTION THAT 
. 2917 :$TMP13 IS POINTING TO IS NOT AN FPP INSTRUCTION, THE 170000 WILL NOT 
7918 ;CLEAR, SATISFYING THE NEXT BRANCH. THE ADDRESS IS AGAIN CORRECTED, 
7919 ;AND THE TESTING PROCESS STARTS OVER. THIS CONTINUES UNTIL $TMP13 IS 
7920 :POITING TO AN FPP INSTRUCTION, AND NORMALLY WILL NOT BE EXECUTED MORE 
7921 :THAN THREE TIMES BEFORE FINDING THE INSTRUCTION. 
7922 041600 162737 000002 001260 1$: SUB #2,$TMP13 ;SUBTRACT 2 FROM $TMP13. 
7923 041606 012737 170000 041620 MOV #170000, 2$+4 ;SET_UP BIC DATA LOCATION. 
2924 0641614 047727 137440 170000 28: BIC @$1MP13,4170000 ;TEST TO SEE IF FPP INSTRUCTION. 
7925 041622 001366 BNE 1$ [BRANCH BACK FOR ANOTHER TRY IF NOT. 
7926 041624 012737 000264 001272 MOV #364 ,$TMP20 sMOVE FAILURE TO ABORT ERROR TO $TMP20. 
7927 041632 000137 042666 JMP MUL TER ; JUMP TO MULTIPLE ERROR HANDLER. 
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CKFPCCO FRITIF FLTG PNT PRT C 
TEST # 114 = AUTO INCREMENT/DECREMENT TEST, 


7928 041636 


042156 


013737 
013737 


000060 
001444 


042737 


170000 


177574 
177576 
177572 
000365 
040622 


042666 
137354 


000060 
001266 


177770 
001266 


001270 
001240 


001260 
000002 
001240 
001270 


001240 
001240 


001236 


001240 


042564 
000001 


042750 


E 16 
MACRO M1113 + pia 13:53 PAGE 91 


001236 
001260 


001272 
001260 
001266 
001272 


001244 
001260 


041750 


001266 
000007 


001270 
001270 


001240 


001240 
001240 


001273 


001272 


001244 


TRPV: 


1$: 


2$: 
200$: 


4$: 


5$: 


61$: 


62$: 
65$: 


66$: 


SR1,$TMP2 
+a Seana 


MMR 
#365,$TMP20 
#MODE1 , STMP13 
MULTER 
a$TMP13,$TMP16 
#363,$TMP20 
$TMP3 


#65$,$TMP5 
ALABEL1,$TMP13 
61$ 


#60,200$ 
$TMP16, (PC) + 
60 


SEQUENCE 


sMOVE SR1 TO $TMP2 FOR TESTING. 

; TRANSFER ADDRESS OF INST. CAUSING TRAP TO $TMP13. 
:TURN OFF MEMORY MANAGEMENT. 

:MOVE 365, THE MODE 0 ERROR, TO LOWER BYTE IN ERROR 


BRANCH AROUND MODE 0 ERROR JUMP IF NOT 

; JUMP 70 ERROR NEST. 

:MOVE INSTRUCTION CAUSING TRAP TO $TMP16. 
E 363, SR1 WRONG ERROR, 

‘CLEAR CALCULATED LOCATION. 

[MOVE NEXT CHECK ADDRESS TO $TMPS. 

;SEE IF TRAP IS BEFORE MODE ¢ REG 1 CLRF INST. 

:BRANCH TO SR1=0 TEST IF SO 

;SET UP BIC DATA POSITION. 

;TEST TO SEE IF MODE 6 OR 7 INSTRUCTION. 

SLOCATION TO HOLD 60 

SBRANCH DIRECTLY TO BYTE TABLE TESTING IF SO. 


61$ 
3 THIS NEXT ROUTINE DETERMINES WHICH REGISTER WAS IN THE INSTRUCTION, AND 
[LOADS THE START AND END VALUES OF EITHER R1 OR R7 (PROGRAM COUNTER) INTO 


:$TMP17 AND $TMP3 RESPECTIVELY. 
7DIFFERENCE THAT ACTUALLY OCCURED. 
7FOR ZERO IN SR1 IS ACCOMPLISHED. 
71S SHIFTED LEFT 3 PLACES, 
;OF THE INSTRUCTION IS ADDED. 


THEY ARE THEN SUBTRACTED TO FIND THE 

IF NO DIFFERENCE WAS FOUND, THE TEST 

IF A DIFFERENCE IS FOUND, THE DIFFERENCE 
THE TOP BYTE IS CLEARED, AND THE REGISTER 
$TMP3 NOW CONTAINS WHAT SHOULD APPEAR 


ACCORDING TO WHAT ACTUALLY HAPPENED TO THE REGISTER. 


sIN SR1, 

BIC #177770,$TMP16 
CMP $TMP16,47 
BEQ 5$ 

MOV R4,$TMP17 
MOY R1,$7MP3 

BR 6$ 

MOV $TMP13,$TMP17 
ADD #2,$79P17 
MOV (SP) ,STMP3 
SUB $TMP17,$TMP3 
BEQ 61$ 

ASL $TMP3 

ASL $TMP3 

ASL $TMP3 

BIC #177400,$TMP3 
ADD $TMP16,$TMP3 
MOVB (R5) ,$TMP22 
CMPB STMP2,(R5)+ 
BNE 62$ 

DEC R5 

CMPB $TMP3,(R5)+ 
BEQ 65$ 

JMP 7$ 

BITB #1, $TMP20+1 
BEQ 66$ 

JMP RETURN 

MOVB #366,$TMP20 
MOv RO, STORE+56 
CLR $TMP2 

MOV #101$,$TMP5 
CMPF STORE ,ACO 
CFCC 


OMPARE REGISTER TO DETERMINE IF IT IS REG 7. 


;BRANCH TO THE REG 7 SETUP IF EQUAL TO REG 7. 
zMCVE THE START VALUE TO $TMP17. 


:MOVE THE END VALUE TO $TMP3. 

;BRANCH TO CONTINUE. 

;MOVE THE START VALUE TO $TMP17. 

zADD 2 TO START VALUE FOR NORMAL INCREMENTING. 
:MOVE THE END VALUE TO $TMP3. 

FIND THE DIFFERENCE THAT OCCURED 

[BRANCH TO TEST FOR SR1=0 IF NO DIFFERENCE. 


TARITHMETIC SHIFT LEFT $TMP3 3 
PLACES TO PUT DIFFERENCE FOUND 
IN BITS 3 THROUGH 7 


;BIT CLEAR UPPER BYTE OF S$TMP3. 

;ADD THE REGISTER THAT WAS CHANGED, AND 
[MOVE EXPECTED DATA TO $TMP22. 
COMPARE SR1 WITH TABLE DATA. 
[BRANCH TO ERROR JUMP IF WRONG. 
CORRECT R5 BEFORE NEXT COMPARE. 

; COMPARE CALCULATED WITH TABLE DATA. 
[BRANCH AROUND ERROR JUMP IF OK 

; JUMP TO ERROR REPORT IF INCORRECT. 
;TEST TO SEE IF BIT 8 IS SET 

[BRANCH AROUND AC SKIP JUMP IF 


NOT. 
: JUMP TO RETURN ~ AC TESTS ARE TO BE SKIPPED. 


MOVE 366, AC LOAD ERROR, TO ERROR POINTER. 
[STORE RO'FOR USE LATER IN THIS ROUTINE. 
:MOVE A 'O' IN ‘AC CHANGED LOCATION. 

[MOVE RETURN TO bye 
7SEE IF ACO WAS CHANGED, 
COPY FPP CONDITION CODES TO CPU CODES. 
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POINTER. 
[SEE IF INSTRUCTION CAUSING TRAP IS BEFORE MODE 1 (MODE 0). 


TO LOWER BYTE IN ERROR POINTER. 


al CLEAR THE INSTRUCTION, LEAVING THE REG EXPOSED. 


CKFPCCO FPIIF FLTG PNT PRT C 
TEST # 114 = AUTO INCREMENT/DECREMENT TEST, 


7985 042160 001412 BEQ 101$ ;BRANCH TO NEXT TEST IF OK. 
7986 042162 176037 043062 STF ACO,STORE +46 + STORE ACTUAL ACO FOR ERROR PRINTING. 
7987 042166 012700 043014 MO #STORE ,RO MOVE ADDRESS OF EXPECTED ACO TO RO. 
7988 ; THE NEXT TWO INSTRUCTIONS TRY 16 "RESTORE THE ACCUMULATOR AND CHECK THE ACCUMULATOR 
7989 3TO MAKE SURE IT WAS RESTORED PROPERLY FOR THE NEXT RUN THROUGH THIS FRAP HANDLER. 
7990 :1T IS *IMPORTANT* TO REALIZE THAT IF THE ‘‘CMPF’’ FINDS A DIFFERENCE, THAT THE 
7991 > *FLOATING*POINT*STATUS* IS BEING CHANGED MISTAKENLY. AN ERROR IN THE MICROCODE 
7992 [HAS BEEN FOUND TO CAUSE THIS, SO CHECK THE REVISION OF THE ROM/PROM SET IN THE 
799% :FPP YOU HAVE. IF YOU DO HAVE WHAT *SEEMS* TO BE THE LATEST REV, A NEW REV WILL 
7994 [BE COMMING OUT TO CORRECT THIS PROBLEM. THIS SAME "LDF/CMPF'' SET OF RESTORE/ 
7995 CHECK INSTRUCTIONS IS ACCOMPLISHED FOR EACH ACCUMULATOR CHECK. IT IS ALSO 
7996 ; IMPORTANT TO NOTE THAT IF AN ACCUMULATOR FAILS TO RESTORE PROPERLY, SUBSEQUENT 
7997 [PASSES THROUGH THE TRAP HANDLER WILL SKIP THE ACCUMULATOR CHECKS DUE TO THE 
7995 ‘BIT TEST #400 ABOVE. FOR EXAMPLE, IF ACO FAILS TO LCAD PROPERLY, AC? THROUGH 
7999 ZAC3 WILL STILL BE CHECKED. AS SOON AS ANOTHER FPP INSTRUCTION TRAPS IN THE 
8000 :MAIN TEST, ALL are ace ACO-AC3 ootcad WILL BE SKIPPED. 
8001 042172 172437 043014 LoF eras sRESTORE ACO. 
8002 042176 173437 045014 (MPF STORE, ACO ;SEE IF IT WAS RESTORED PROPERLY. 
8003 042202 170000 CFCC ee ;COPY FPP CONDITION CODES TO CPU CODES. 
8004 042204 001567 BEQ 7$ = [BRANCH TO ERROR CALL IF OK. 
8005 042206 000476 BR 113$ ;BRANCH TO ERROR SETUP ROUTiNE. 

042210 012737 000001 001236 101$: MOV #1, $TMP2. sPUT A ‘1° IN ‘AC CHANGED’ LOCATION. 

7? 042216 012737 042262 001244 MOV #102$,$TMP5 ;MOVE RETURN TO $TMP5. 

8008 042224 173537 043024 CMPF STORE+1U,AC1 :SEE IF AC1 WAS CHANGED. 
8009 042230 170000 CFCC *% COPY ©PP CONDITION CODES TO CPU CODES. 
8010 042232 001413 BEQ 102$ “BRANCH TO NEXT TEST IF OK. 
8011 042234 174137 043062 STF AC1,STORE +46 :STORE ACTUAL AC1 FOR ERROR PRINTING. 
8012 042240 012700 043024 MOV #STORE+10,RO sMOVE ADDRESS OF EXPECTED AC1 TO RO. 
8013 042244 172537 043024 LDF STORE+10,AC1 ;RESTORE AC1. 
8014 042250 173537 043024 CMPF STORE +10,AC1 ;SEE IF IT WAS RESTORED PROPERLY. 
8015 042254 170000 CFCC ;COPY FPP CONDITION CODES TO CPU CODES. 
8016 042256 001542 BEQ 7$ ;BRANCH TO ERROR CALL IF OK. 
8017 042260 000451 BR 113$ ;BRANCH TO ERROR SETUP ROUTINE. 
8018 042262 012737 000002 001236 102%: MOV #2, $TMP2 3PUT A ‘2° IN ‘AC CHANGED LOCATION. 
8019 042270 012737 042334 001244 MOV #103$,$TMP5 [MOVE RETURN 10 $TMPS. 

042276 173637 043034 CMPF- STORE +20, AC2 ;SEE IF AC2 WAS CHANGED. 
8021 042302 170000 CFCC ;COPY FPP CONDITION CODES TO CPU CODES. 
8022 042304 001413 BEQ 103$ [BRANCH TO NEXT TEST IF OK. 
8023 042306 174237 043062 STF AC2,STORE +46 sSTORE ACTUAL AC2 FOR ERROR PRINTING. 
8024 042312 012700 043034 MOV #STORE+20,R0 SMOVE ADDRESS UF EXPECTED AC2 TO RO. 
8025 042316 172637 043034 LDF STORE +20 ,AC2 SRESTORE AC2. 
8026 042322 173637 043034 CMPF STORE+20,AC2 SEE IF IT WAS RESTORED PROPERLY. 
8027 0422326 170000 CFCC ;COPY FPP CONDITION CODES TO CPU CODES. 
8028 042330 001515 BEQ 7$ ;BRANCH TO ERROR CALL IF OK. 
8029 042332 000424 BR 113$ ;BRANCH TO ERROR SETUP ROUTINE. 
8030 042334 012737 000003 001236 103$: MOV #3,$1MP2 ;PUT A ‘3° IN ‘AC CHANGED’ LOCATION. 
8031 042342 012737 042414 001244 MOV #100$,$TMP5 [MOVE RETURN TO $TMPS. 
8032 042350 173737 043044 CMPF STORE +30,AC3 SEF IF AC3 WAS CHANGED. 
8033 042354 170000 CFCC ;COPY FPP CONDITION CODES TO CPU CODES. 

042356 001416 BEQ 100$ [BRANCH TO NEXT TEST IF OK. 
8035 042360 174337 043062 STF AC3,STORE+46 [STORE ACTUAL AC3 FOR ERROR PRINTING. 

36 042364 012700 043044 MOV #STORE +30 ,RO MOVE ae OF EXPECTED AC3 TO RO. 

8037 042370 172737 043044 LDF STORE +30,AC3 SRESTORE AC3. 
8038 042374 173737 043044 CMPF STORE+30,AC3 ;SEE IF IT WAS RESTORED PROPERLY. 
8039 042400 170000 CFCC COPY FPP CONDITION CODES TO CU CODES. 
8040 042402 001470 BEQ 7$ TBRANCH TO ERROR CALL IF OK. 
8041 042404 012737 000770 001272 113%: MOV #770,$TMP20 SMOVE 370 FOR AC LOAD FAILURE, & SET BIT 8 OF ERROR POINTER. 


MODE 
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SEQUENCE 200 


CKEPCCO FPIIF FLTG PNT PRT C 


TEST # 114 = AUTO INCREMENT/DECREMENT TEST, 


8042 


042412 


042766 


000464 


153737 
104000 


062716 


001236 
000367 
042462 
043054 


001246 
043054 
043054 


000002 
042524 
043056 


001246 
043056 
043056 
000003 
042750 
043060 
001246 
043060 
043060 
177777 
000370 
000506 


001240 


001272 


001270 
001266 
000364 
000365 


136274 
000004 


000002 
000002 


G 16 
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001272 
001244 


001240 


001236 
001244 


001240 


001260 
001244 


001240 


043156 
001272 


001272 


001252 
001274 
042712 
042712 


001272 
001272 


000000 


MODE 
BR 7$ ;BRANCH TO ERROR CALL. 
CLR $TMP2 ;CLEAR_*REGISTER CHANGED’ LOCATION 
MOVB #367 ,$TMP20 [MOVE 367, GENERAL REGISTER CHANGED ERROR, TO POINTER. 
MOV #120$,$TMP5 [MOVE RETURN TO $IMP5. 
CMP STORE +40 ,RO :SEE IF RO WAS CHANGED. 
BEQ 120% ;BRANCH TO NEXT TEST IF OK. 
MOV RO, $TMP6 sMOVE ACTUAL RO TO LOCATION FOR ERROR PRINTING. 
MOV STORE+40,$TMP3 MOVE lg TO LOCATION FOR ERROR PRINTING. 
MOV STORE +40,R0 RESTORE R 
BR 7$ BRANCH TO ERROR CALL 
120$: MOV #2,$TMP2 ;PUT A ‘2° IN REGISTER CHANGED’ LOCATION. 
MOV #130$,$TMP5 [MOVE RETURN TO $TMP5. 
CMP STORE +42,R2 SEE IF R2 WAS CHANGED. 
BEQ 130$ :BRANCH TO NEXT TEST IF OK. 
MOV R2,$TMP6 sMOVE ACTUAL R2 TO LOCATION FOR ERROR PRINTING. 
MOV STORE+42,$TMP3 ;MOVE EXPECTED TO LOCATION FOR ERROR PRINTING. 
MOV STORE +42,R2 RESTORE Re. 
BR 7$ ;BRANCH TO ERROR CAL 
130$: MOV #35, $TMP13 zPUT A ‘3° IN "REGISTER CHANGED® LOCATION. 
MOV #RETURN,$TMPS MOVE RETURN TO $TMPS. 
CMP STORE +44 ,R3 :SEE IF R3 WAS CHANGED. 
BEQ RETURN ;BRANCH TO RETURN IF OK. 
MOV R3,$TMP6 zMOVE ACTUAL R3 TO LOCATION FOR ERROR PRINTING. ‘y 
MOV STORE +44 ,,$1TMP3 ~—e EXPECTED TO LOCATION FOR ERROR PRINTING. 
MOV STORE +44 ,R3 RESTORE R3. 
7$: MOVB -1(R5) ,EXPCTD “MOVE DATA FROM TABLE FOR POSSIBLE USE ;DPMO0O1 
CMPB #370,$1TMP20 :TEST TO SEE IF AC INFO NEEDS TO BE STORED. 
BEQ 71$ ;BRANCH TO INFO STORE ROUTINE IF SO. 
CMPB #366,$TMP20 ;TEST TO SEE IF AC INFO NEEDS TO BE STORED. 
BNE MULTER 3SKIP AC_INFQ ROUTINE IF NOT. 
(i$: MOV (RO) +,$TMP3 :MOVE 1ST WORD OF ACTUAL AC DATA TO $TMP3. 
MOV (RO) +,$TMP4 ;MOVE 2ND WORD OF ACTUAL AC DATA TO $TMP4. 
MOV (RO)+,$TMP6 ;MOVE 3RD WORD OF ACTUAL AC DATA TO $TMP6. 
MOV (RO)+,$TMP7 sMOVE 4TH WORD OF ACTUAL AC DATA TO $TMP7. 
MOV STORE +56,RO ;RESTORE RO TO WHAT IT HAD AT BEGINNING OF TRAP. 
MOV STORE+46,$TMP10 :MOVE 1ST WORD OF EXPECTED AC DATA TO $TMP10. 
MOV STORE+50,$TMP11 :MOVE 2ND WORD OF EXPECTED AC DATA TO $TMP11. 
MCV STORE+52,$TMP12 ;MOVE 3RD WORD OF EXPECTED AC DATA TO $TMP1e. 
MOV STORE+54,$TMP21 ;MOVE 4TH WORD OF EXPECTED AC DATA TO $TMP21. 
MULTER: MOV (SP)+,$TMP16 SAVE 1ST CONTENTS OF STACK AND POP IT ONCE. 
MOV (SP)+, gated SAVE 2ND CONTENTS OF STACK AND POP IT AGAIN. 
BICB #377,74$ ;CLEAR OUT LAST ERROR OFFSET FROM ERROR INSTRUCTION. 
BISB $TMP20, 74% [PUT ERROR NUMBER TO BE ACCOMPLISHED IN ERROR INSTRUCTION. 
78 aE a 1S DEFINED BY THE CONTENTS OF THE LOWER BYTE OF LOCATION [1272] 
MOV $TMP17,-(SP) PUSH 2ND CONTENTS BACK ON THE STACK. 
MOV $TMP16,-(SP) [PUSH 1ST CONTENTS BACK ON THE STACK. 
CMP #364 ,$TMP20 7SEE IF RETURN tt ty IS TO BE SKIPPED. 
BEQ RTI SBRANCH TO RTI IF S 
CMP #365,$TMP20 7SEE IF RETURN ROUTINE IS TO BE SKIPPED. 
BEQ RTI SBRANCH TO RTI IF SO. 
JMP a$TMP5 ; JUMP TO CONTINUE CHECKING. 
RETURN: CMP #4 ,a0(SP) 7SEE IF INSTRUCTION IS THE IOT. 
BEQ 9$ [BRANCH IF THE IOT HAS BEEN FOUND. 
ADD #2,(SP) : CORRECT PC RET''RN. 
BR RETURN [BRANCH BACK FOR ANOTHER T 
9$: ADD #2, (SP) ; CORRECT PC RETURN TO POINT AFTER IOT FOUND, 


CKFPCCO FRIIF FLTG PNT PRT C 


H1 
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No 


TEST # 114 = AUTO INCREMENT/DECREMENT TEST, MODE 


8099 042772 005237 
Hye 042776 000002 


043014 


— ss Ss = ts td 


Oo Co 00 00 00 00 ND 
rmnron 
rme—-OOON 


oo 
—2 
Nm 


8123 043074 


8129 043200 
043200 


0 
ne 043202 


043202 


04 3252 





8102 043000 


013737 
104412 


000004 


003077 


177572 
000 000 
000 361 
177572 


001262 000250 
040522 000020 


001102 
001302 


001324 
100000 001324 


SEQUENCE 202 
RTI: INC MMRO ;TURN ON MEMORY MANAGEMENT, AND 
RT] RETURN FROM INTERRUPT. 
NODAT: _.BLKW 6 LOCATION IN NON-RES. D-SPACE USED TO FORCE A TRAP. 


3 THE *STORE’ LOCATION BELOW IS PARTITIONED TO RESERVE *4* WORDS FOR EACH FP 
sACCUMULATOR, EVEN THOUGH ONLY 2 ARE REQUIRED FOR STORING A FLOATING NUMBER. 
THIS IS BECAUSE *IF* THE FPS IS CHANGCD BY A PROBLEM IN THE FPP, SO THAT A 
>*DOUBLE* IS STORED, *4* WORDS RESERVED WILL GUARANTEE THAT THE NEXT DATA BLOCK 
WILL NOT BE DISTURBED. Dn piel caret IS AS FOLLOWS: 


: 1-4 STORE ACO 

; 5 -10 STORE AC1 

; 11-14 STORE AC2 

: 15-20 STORE AC3 

; 21 STORE RO 

: 22 STORE R2 

Fy 23 STORE R3 

; 24-27 STORE ACTUAL AC 

Ps 30 STORE ACTUAL RO SO RO CAN BE USED IN AC ERROR CALLS 
STORE: .BLKW 30 : STORAGE LOCATIONS FOR THE FLOATING ACCUMULATORS & DATA. 


:THE FOLLOWING BYTE TABLE WILL BE USED TO CHECK THE VALUES OF SR1 AND THE CALCULATED 
[VALUES. SR1 MAY TRACK THE ACTIVE REGISTER C anteha’ BUT IF THE *VALUE* OF THE 
7 INCREMENT/DECREMENT IS WRONG, AN ERROR STILL EXISTS 
RYTABL: .BYTE 0,0,0,0,0,0,41,21.41,41,0.0,0,27,0, 27.0.27,0,27.0.341, 361, 341 
(BYTE  341.0.361. 361, 561, 361,0,0.0,0.0,0,0,0, 0:0.0,0.0,0,0,0,0,0,0,0 


EXPCTD: .WORD 0 (OCATION TO HOLD DATA FROM BYTE TABLE —;OPMQO1 
ENDTES: CLR MMRO a TURN OFF MEMORY MANAGEMENT. 
MOV $TMP14,MMVECT :RESTORE MMVECT CONTENTS. 
weethcat MOV SAVIOT.IOTRAP =:RESTORE IOTRAP CONTENTS. 
” RSETUP :GO INITIALIZE THE FPS AND STACK: AND 


3SEE IF THE USER HAS EXPRESSED 

3THE DESIRE TO CHANGE THE SOF TWARE 
7VIRTUAL CONSOLE SWITCH REGISTER (HAS 
7; THE USER TYPED CONTROL G?). 


TST115: 


.SBTTL END OF PASS ROUTINE 
DOOOSOIOUIOIDOIIDODIIDIIUDIIDIDIIDDIDUUUIDIIUIDUIDIDIDIDNO I rnin rns srs 
;* INCREMENT THE PASS NUMBER ($PASS) 

:* INDICATE END-OF-PROGRAM AFTER 1 PASSES THRU THE PROGRAM 

z*IF SW12=1 INHIBIT TRACE TRAP 

z*IF THERES A MONITOR GO TO IT 

it THERE ISN'T JUMP TO LOOP 


CLR $STSTNM 3 TEND THE TEST NUMBER 

CLR $TIMES ;ZERO THE NUMBER OF ITERATIONS 
INC $PASS 3 CRN THE PASS NUMBER 

BIC #100000, $PASS < DON'T ALLOW A NEG. NUMBER 

DEC (PC) + 2 ;LOOP? 


$EOPCT: .WORD 1 
BGT $DOAGN Ves 


_CKFPCCO FRIIF FLTG PNT 
END OF PASS ROUTINE 


043234 
043236 


043266 


043474 
043476 


012737 
000001 
043230 
104401 
000407 
013746 


104403 
006 


001405 


000240 
104400 


000002 


000137 
006690 
009900 

377 


PRT C 


043250 


001326 


001112 
043312 


001112 


001313 
001112 
000042 


043412 


000042 


000020 
010000 


043474 


000020 
043470 


377 
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135472 


000 


m 
SENDCT: ry 


37658: 
464$: 


+6782 
66$: 


90008: 


$GET42: 


$CLR.T: 


$SENDAD: 


$DOAGN: 


1$: 
$RTRN: 


$LOOP: 


$RTNAD: 


$TBIT: 


$ENULL: 


JMP 

. WORD 
. WORD 
BYTE 
-EVEN 


I 16 
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 Piglien ncrins 


82° 


SEQUENCE 


7sRESTORE COUNTER 


TYPE ASCIZ STRING 
SIGET OVER THE ASCIZ 


OT 3><15>/END PASS #/ 


$PASS,=(SP) 


6 


0 
SERTTL 
9000$ 
-67$ 


66$ 
/ TOTAL ERRORS 


SERTTL,-(SP) 


20, (SP) 
#$LOOP ,-(SP) 


a(PC)+ 
LOOP 


0 
=1,°1,0 


77 SAVE SPASS FOR TYPEOUT 

zz TYPE PASS NUMBER IN OCTAL 
32GO TYPE=-OCTAL ASCII 

73 TYPE 6 DIGITS 

77 SUPPRESS LEADING ZEROS 
;SEE IF ANY ERRORS TO REPORT 
;BRANCH IF NOT 

sz TYPE ASCIZ STRING 

:;GET OVER THE ASCIZ 

SINCE LAST REPORT / 


sz SAVE SERTTL FOR TYPEOUT 

7: TOTAL NUMBER OF ERRORS IN OCTAL 
3:GO0 TYPE--OCTAL ASCI1 

ic TYPE 6 DIGITS 

:; SUPPRESS LEADING ZEROS 

77 TYPE CARRIAGE RETURN, LINE FEED 
7: CLEAR ERROR TOTAL 

32GET MONITOR ADDRESS 

7 BRANCH IF NO MONITOR 

:; INSURE THE ‘'T’’ BIT IS CLEAR 

77, SETUP FOR AN RTI OR RTT 

7:G0 DO AN RTI OR RTT TO LOAD THE PSW 
scWITH A CLEARED ‘'T’’ BIT 


32 INSURE RO CONTAINS THE MONITORS 
7ZRETURN ADDRESS 

32CLEAR THE WORLD 

3:G0 TO MONITOR 

oe con ROOM 


SSACT11 


zPUSH OLD PSw AND PC ON STACK 
CLEAR THE ‘'T’* BIT 
7 RUN sade TRACE TRAP? 


BR IF 
:IS IT TIME FOR TRACE TRAP 
IF NO 


:BR 
33SET TRACE TRAP 
; JUMP TO START OF TEST 
;:RETURN==THIS, IS CHANGED TO 
AN ‘RTT’ IF “RIT IS A LEGAL 
iT INSTRUCT ION 


3 ZRETURN 


z2''T'' BIT STATE INDICATOR 
sZNULL CHARACTER STRING 


:DPMO01 
:DPMO01 


203 


| 


/CKFPCCO FP1°+ FLTG PNT PRT C 
END OF PASS ROUTINE 


8136 
8137 


043716 


104406 
032777 
001134 
000416 


013746 


040000 


000004 
043542 
177060 
000004 


000004 


000400 
135352 
177766 
000001 
000001 
177777 
001103 
001103 
001115 
001000 
001110 


001103 
001302 


004000 
001324 
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135426 


000004 


135360 
001102 


044020 
044020 


177766 
001320 


001103 
135262 
001106 


135230 


-SBTTL SCOPE HANDLER ROUTINE 


CIRO II IIIIOIDIDIDIOIIIOIIIOIOISIDIOISIOIUIUIUIUIUOIIOIIDIDIOIUIUIDIIDIDI OR tot tt 

> *THIS ROUTINE CONTROLS THE LOOPING OF SUBTESTS. IT WILL INCREMENT 
:*AND LOAD THE TEST NUMBER(STSTNM) INTO THE DISPLAY REG. (DISPLAY<7:0>) 
:*AND LOAD THE ERROR FLAG ($ERFLG) INTO DISPLAY<15:08> 

>*THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 


+ *SW14= 1 LOOP ON TEST 
:*SW11=1 INHIBIT ITERATIONS 
> *SwO09=1 LOOP ON ERROR 
:*SwO08=1 LOOP ON TEST IN SWR<7:0> 
7 *CALL 
;* SCOPE ::SCOPE=I0T 
$SCOPE: 
CKSWR : TEST FOR CHANGE IN SOF 7=SWR 
1$: BIT #81T14,aSWR :LOOP ON PRESENT TEST? 
BNE $OVER YES IF Swi4=1 
: 4HARASTART OF CODE FOR THE XOR TESTERAAMRH 
$xTSTR: BR 6$ iilF RUNNING ON THE "KOR" TESTER CHANGE 
: THIS INSTRUCTION TO A ‘NOP*' (NOP=240) 
MOV Henig SF -(SP) 17 SAVE THE ph ly OF THE ERROR VECTOR 
MOV £2 3 RVEC :SET FOR TIMEOUT 
TST 179660 > TIME our ON XOR? 
MOV (SP)+, ERRVEC ZRESTORE THE ERROR VECTOR 
BR $SVLAD *260 TO THE NEXT TEST 
5$: CMP (SP) +, (SP) + ri CLEAR THE STACK AFTER A TIME OUT 
MOV (SP)+, ERRVEC 2 sRESTORE THE ERROR VECTOR 
BR 7$ ;LOOP ON THE PRESENT TEST 
6%: ;AA#ASAEND OF CODE oe Mn XOR™ TESTERAMAAA 
BIT #B1T08,a 7 LOOP — SPEC. TEST? 
BEQ 2% 3 IBR IF 
CMPB aSWR,STSTNM 770N THE NRIGHT TEST? SWR<7:0> 
BEQ SOVER + :BR IF YES 
2$: MOV 177766, CPSAVE sMOVE CPU ERR REG VALUE TO LOC FOR TST ;DPMOO1 
BIT #B1T00, CPSAVE :SEE IF THE POWER MONITOR BIT IS ON :DPMOO1 
BEQ 2000$ [BRANCH TO CONTINUE ROUTINE IF CLEAR :DPMOO1 
BIC #B1T00,177766 ;CLEAR THE BIT FOUND TO BE SFT ;DPMOO1 
MOV #-1, $F ATAL *MOVE -1 TO $FATAL INDICATING PWR MON ER: DPMOO1 
ERROR +177 :CALL SPECIAL POWER FAIL BIT ERROR CALL ;DPMOO1 
CLRB SERFLG :CLEAR ERROR FLAG FOR CHECK BELOW : DPMOO1 


2000$: doy owes z2HAS AN — OCCURRED? 
CMPB SERMAX , SERFLG 2 iMAX. —s FOR THIS TEST OCCURRED? 


BHI be I 
BIT #31T09,aSWR >:LOOP ON ERROR? 
BEQ 4 ;3:BR_IF NO 
7$: +5 Le aaah 3:SET LOOP ADDRESS TO LAST SCOPE 
V 
4$: CLRB SERFLG aay THE ERROR FLAG 
CLR $TIMES :CLEAR THE NUMBER OF ITERATIONS TO MAKE 
BR 1$ ESCAPE TO THE NEXT TEST 
3$: BIT #B1T11,aSWR F gay gg ITERATIONS? 
BNE 1$ TBR IF YES 
TST $PASS eer FIRST PASS OF PROGRAM 


BEQ 1$ INHIBIT ITERATIONS 


204 


-CKFPCCO FP11F FLTG PNT 
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8138 
8139 


043720 


044024 


005237 


000000 


013737 
032777 


PRT C 


007104 
001302 


001106 


001103 


001102 
002000 


001306 


044024 
020000 
046460 
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SEQUENCE 
INC $ICNT y INCREMENT ITERATION COUNT 
001104 CMP $TIMES,$SICNT : CHECK THE NUMBER OF ITERATIONS MADE 
BGE $OVER R IF MORE ITERATION REQUIRED 
001104 1$: MOV #1,$1CNT + :REINITIALIZE THE ITERATION COUNTER 
001302 MOV $MXCNT,$TIMES t: T NUMBER OF ITERATIONS TO DO 
$SVLAD: INCB $TSTNM 33COUNT TEST NUMBERS 
001322 MOVB $TSTNM,$TESTIN ::SET TEST NUMBER IN APT MAILBOX 
MOV (SP), $LPADR 3: SAVE SCOPE LOOP ADDRESS 
MOV (SP) ,$LPERR 7zSAVE ERROR LOOP ADDRESS 
CLR $ESCAPE +s CLEAR THE ESCAPE FROM ERROR ADDRESS 
001115 MOVB #1,$ERMAX ZONLY ALLOW ONE(1) ERROR ON NEXT TEST 
135130 $OVER: MOV $TSTNM,ADISPLAY +: DISPLAY TEST NUMBER 
MOV $LPADR, (SP) : FUDGE RETURN ADDRESS 
RT] 2:FIXES PS 
CPSAVE: .WORD 0 sLOCATION TO SAVE CPU ERR REG CONTENTS ;DPMO01 
$MXCNT: 1 ::MAX. NUMBER OF ITERATIONS 
.SBTTL ERROR HANDLER ROUTINE 
SLA ARRAREEAEERERAEREEAEEA RARER RERAERRAEAAAERAA ERR ERRAR ED 
:*THIS ROUTINE WILL INCREMENT THE ERROR FLAG AND THE ERROR COUNT, 
:*SAVE THE ERROR ITEM NUMBER AND THE ADDRESS OF THE ERROR CALL 
:*AND GO TO ERTYPE ON ERROR 
* * THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 
+*SW15=1 HALT ON ERROR 
*SW13=1 INHIBIT ERROR TYPEQUTS 
*SW10=1 BELL ON ERROR 
7*Sw09=1 LOOP ON ERROR 
7 *CALL 
3;* ERROR N : ERROR=EMT AND N=ERROR ITEM NUMBER 
— -WORD 0 :LOC'N TO HOLD $ERRPC DURING DUAL ERR :DPMOO1 
CKSWR TEST FOR CHANGE IN SOF T=SWR 
7$: INCB $SERFLG SET THE ERROR FLAG 
BEQ 7$ : - CDON'T LET THE FLAG GO TO ZERO 
135076 MOV $TSTNM,a@DISPLAY : DISPLAY TEST NUMBER AND ERROR FLAG 
135066 BIT #B1T10,aSWR ing ON ERROR? 
BEQ 1$ 2 - SKIP 
TYPE -SBELL {RING BELL 
1$: INC $ERTTL : COUNT THE NUMBER OF ERRORS 
MOV gt SERRPC = GET ADDRESS OF ERROR INSTRUCTION 
01116 SUB . SERRPC 
001114 MOVB SSERRPC. $ITEMB ;:;:STRIP AND SAVE THE ERROR ITEM CODE 
001114 C #177, $ITEMB ;SEE IF PWR MON ERROR CALL :DPMOO1 
BEQ 1000$ ;BRANCH IF SO TO CALL THE ERROR :DPMOO1 
044020 MOV 177766, CPSAVE sMOVE CPU ERR REG TO CPSAVE FOR TEST ;DPMO01 
044020 BIT #B1T00,CPSAVE ;SEE IF POWER MONITOR BIT IS SET :DPMOO1 
BEQ 1000$ ‘BR ANCH IF OK :DPMOO1 
177766 BIC #B1T00,177766 : CLEAR THE arr FOUND SET ;DPMOO1 
044024 MOV SERRPC, IBSAVE + SAVE ey :DPMO01 
ERROR +177 7 CALL BUER RWONITOR BIT ERROR >DPMO01 
001116 10008 MOY IBSAVE , SERRPC ‘RESTORE $SERROR ;DPMOO01 
134754 BIT #B1T13,aSWR ziSKIP TYPEQUT IF SET 
BNE 20$ :zSKIP TYPEOUTS 
JSR PC,ERTYPE ::GO TO USER ERROR ROUTINE 


205 


~CKFPCCO FPIIF FLTG PNT PRT C 
ERROR HANDLER ROUTINE 


044172 


104401 
122737 


013716 


022737 
001001 
000000 


032777 


007313 
000001 
044250 
001114 
000377 

00400 


0 
134654 
045312 


044024 
134652 


001000 
044024 


001110 
001304 


044024 
001304 
043422 


001000 
001162 
177776 
000377 


000002 


001336 
044250 
001114 


044250 
044250 


134636 


000042 


134562 


001162 
134562 


208: 


900$: 
218: 


22$: 
2$: 


3$: 
4$: 


5$: 


6$: 


ERM10: 


TYPE 


L 16 
MACRO M1113 O9=APR=81 13:53 PAGE 91-7 


»$CRLF 


#APTENV, SENV 
2$ 


21$ 
$ITEMB,21$ 
#377 ,$1TEMB 


900$ 
#400,21$ 
@SERRPC,21$ 
PC, $SATY4 

0 

0 

22$ 

IBSAVE 

3$ 

aSwWR 

3$ 
#BITO9,aSWR 
4$ 

IBSAVE 

4$ 


$SLPERR, (SP) 
_ 


5 

IBSAVE 

5$ 

$SESCAPE, (SP) 
ASENDAD , 42 
6$ 


#B1T09,aSWR 
ERM10 
(SP) , $REGO 
#-2,$REGO 
#377 ,a$SREGO 
RM10 


E 
#2, (SP) 


; RUNNING IN APT MODE 
3;NO,SKIP APT ERROR REPORT 
;CLEAR ANY PREVIOUS NUMBER FROM 21$ 
7;SET ITEM NUMBER AS ERROR NUMBER 
;SEE Ir ITEM # IS OVER 400 
;BRANCH IF NOT 
prey BASE OF 400 TO 21$ 
ADD NUMBER OVER 400 TO 21$ 
;;REPORT FATAL ERRCR TO APT 


;zAPT ERROR LOOP 

:SEE IF POWER FAIL ERROR CALL 
:BRANCH IF NOT = HALT NOT ALLOWED 
;zHALT ON ERROR 

:iSKIP IF CONTINUE 

:zHALT ON ERROR! 

72 TEST FOR CHANGE IN SOFT-SWR 
Sg gS ees SWITCH SET? 


ERRGR IS PWR MONITOR BIT ERROR 
IF SO = DON'T FUDGE RETURN 
RETURN FOR LOOPING 

nd AN ESCAPE ADDRESS 


ONE 

ERROR IS PWR MONITOR BIT ERROR 
IF SO = DON'T FUDGE RETURN 
RETURN ADDRESS FOR ESCAPE. 


3sACT-11 AUTO-ACCEPT? 
en IF NO 


SEE IF ERROR #377 


SEQUENCE 


206 


-SBTTL SAVE AND RESTORE RO-R5 ROUTINES 


CLEARER EERE EERE EERE EARTH AERA AEREA TREE ER ARES 
7 *SAVE RO-R5 

s*CALL: 

3* 


SAVREG 
;*UPON RETURN FROM $SAVREG THE STACK WILL LOOK LIKE: 
-* 
3 *TOP---(+16) 


p* t2---(+18) 
T* +4---R5 
p* +6---R4 
3* +8---R3 
3*+10---Re 





| 


| CKFPCCO FRIIF FLTG PNT PRT C 
/ SAVE AND RESTORE RO=R5 ROUTINES 


044410 


044440 016646 000022 
044444 000002 


044446 
044446 012666 900022 


044462 012666 000022 


044502 
8142 
8143 
044504 000000 
* 044506 105737 001157 
044512 100002 
044514 


0176 000002 
044526 122737 000001 001336 


044536 132737 000100 001337 
044544 001405 


M 16 
MACRO M1113 O9=APR=81 13:53 PAGE 91-8 


SEQUENCE 

3*+12---R1 
3*4+14---R0 
$SAVREG: 

MOV RO,-(SP) ;7PUSH RO ON STACK 

MOV R1,-(SP) :zPUSH R1 ON STACK 

MOV R2,-(SP) 3ZPUSH R2 ON STACK 

MOV R3,-(SP) 77PUSH R3 ON STACK 


MOV 22(SP) ,=(SP) 
MOV 22(SP) ,=(SP) 
MOV 22(SP) ,=(SP) £: 
MOV 22(SP) ,-(SP) 3eSAVE PC OF CALL 


RTI 
7*RESTORE RO-R5 


s*CALL: 
,* RESREG 
$RESREG: 
MOV (SP)+,22(SP) 2 ¢RESTORE PC OF CALL 
MOV (SP)+,22(SP) sRESTORE PS OF CALL 
MOV (SP) +,22(SP) + :RESTORE PC OF MAIN FLOW 
MOV (SP)+,22(SP) 7 zRESTORE PS OF MAIN FLOM 
MOV (SP)+,R5 7zPOP STACK INTO R5 
MOV (SP) +,R4 3zPOP STACK INTO R4 
MOV (SP)+,R3 :zPOP STACK INTO R3 
MOV (SP) +,R2 :zPOP STACK INTO R2 
MOV (SP)+,R1 :zPOP STACK INTO R1 
MOV (SP)+,RO :zPOP STACK INTO RO 
RTI 
-SBTTL TYPE ROUTINE 


TIGRIS UIDISISIOIDIDIOIIOIDIEIIIOINIDIDIDIOIDIDIDIOIOIUIDIOIDIOIUIOIDIOIDIOIDIOIDIOISIDIDIDITIISITIIDIMIDIOI IDI 

> *ROUT INE TO TYPE ASCIZ MESSAGE. MESSAGE MUST TERMINATE WITH A O BYTE. 

3*THE ROUTINE WILL INSERT A NUMBER OF NULL CHARACTERS AFTER A LINE FEED. 

3; *NOTE1: $NULL CONTAINS THE CHARACTER TO SE USED AS THE FILLER CHARACTER. 


i*NOTE2: $FILLS CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED. 
: *NOTES: $FILLC CONTAINS THE CHARACTER TO FILL AFTER. 
TeCA LL 
#1) USING A TRAP INSTRUCTION 
a TYPE »MESADR i:MESADR IS FIRST ADDRESS OF AN ASCIZ STRING 
** 
:* TYPE 
;* ME SADR 
** 
EOASCI: .WORD 0 ;LOC TO HOLD ADRS OF TERMINATOR BYTE 7DPMO01 
$TYPE: TSTB $STPFLG 3731S THERE A TERMINAL? 
BPL 1$ ::BR IF YES 
HALT :sHALT HERE IF NO TERMINAL 
BR 3$ 7 LEAVE 
1$: MOV RO,-(SP) 


MOV @2(SP) ,RO 


a — - SENV 
BITB —_ nt » SENVM £3 SPOOL MESSAGE TO APT 


SAVE RO 
£3681 ADDRESS A ASCIZ STRING 
RUNNING IN APT MODE 
NO,GO CHECK FOR APT CONSOLE 


NO,GO CHECK FOR CONSOLE 


207 


oy, 


— 


| 


_CKFPCCO FPIIF FLTG PNT 


| TYPE ROUTINE 


044654 


044660 
044664 
044666 
044672 


044676 
044700 


010037 
737 


013746 
105366 


001366 
005726 


PRT C 
044556 
045302 
000040 


044504 
000002 
000011 
000200 


045042 


044724 
001156 


001154 
000001 


044724 
045042 


000040 
044724 
000007 


134214 


134210 
177600 
000023 


134170 
134164 


177600 
000021 
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001337 


045042 


61$: 
628, 


2$: 


60$: 
3$: 


43: 


5$: 
6$: 


73: 


sHORIZONTAL TAB 


8$: 
9$: 


$TYPEC: 


101$: 


102$: 
10$: 


RO,61$ 
PC,$ATY3 


MAPTCSUP,SENVM 
60$ 


(RO) +,=-(SP) 
4$ 

(SP) + 
RO,EOASCI 
(SP)+,RO 
#2, (SP) 
#HT, (SP) 

8$ 
ACRLF , (SP) 
5$ 


(SP) + 


$CHARCNT 
2$ 


PC, $TYPEC 
$FILLC, (SP)+ 
2$ 


$NULL , = (SP) 
1(SP) 
6$ 


PC,$TYPEC 
$CHARCNT 
7$ 


PROCESSOR 


a" (SP) 
PC,$TYPEC 
#7 , SCHARLNT 
9$ 


(SP) + 
2$ 


OsTKS 

10$ 
a$TKB,-(SP 

oT 9200. SP) 
ASXOFF, (SP) 
102$ 


a$TKS 

101$ 

@a$TKB, (SP) 
#177600, (SP) 
A$XON, (SP) 
101$ 


(SP)+ 


3sSETUP MESSAGE ADDRESS FOR APT 
+ ¢ SPOOL MESSAGE TO APT 


MESSAGE ADDR 


DRESS 
i PAP! ie SUPPRESSED 
YES,SKIP TYPE OUT 
‘PUSH CHARACTER TO BE TYPED ONTO STACK 
‘TBR Ir IT ISN'T THE TERMINATOR 
321F TERMINATOR POP IT OFF THE STACK 


SEQUENCE 


: SAVE ADRS OF TERMINATOR = POSSIBLY USED;DPM001 


RESTORE RO 


i ZADJUST RETURN PC 


7 sRETURN 


;:BRANCH IF <HT> 
BRANCH IF NOT <CRLF> 


3:POP <CR><LF> ‘ 
7: TYPE A CR AND L 


32: CLEAR CHARACTER COUNT 
3iGET NEXT CHARACTER 
ht TYPE THIS CHARACTER 
31S IT TIME FOR FILLER CHARS. ? 
:IF NO GO GET NEXT CHAR. 
;GET # OF FILLER CHARS. NEEDED 
: CAND THE NULL CHAR. 
DOES A NULL NEED TO BE TYPED? 
7;;BR IF NO--GO POP THE NULL OFF OF STACK 
3:60 TYPE A NULL 
:2D0 NOT COUNT AS A COUNT 
LOOP 


3zREPLACE TAB WITH SPACE 
3a TYPE A SPACE 
;3BRANCH IF NOT AT 


72 TAB STOP 


:sPOP SPACE OFF STACK 
3iGET NEXT CHARACTER 


73 CHAR _ BUF FER? 


7 BR IF N 
T 


CHAR 
i: STRIP eo BITS 
:WAS CHAR XOFF 


::BR IF NOT 


WAIT FOR CHAR ~ 


:iGET CHAR 
2 *SIRiv it 

S IT XON? 
;3BR IF NOT 


ccFIX STACK 


:MJDOO1 


:MJD001 


208 





CKFPCCO FP11F FLTG PNT PRT C 
TYPE ROUTINE 


044776 
04500 


8144 
8145 


SERRERPRREREERERER 
PUSRERESNSS FEESSTE 


Vww 
NO 


105777 
1 P) 


=SS=S°SS==a= & 
PUP SGRONUNE VEe 2 
MERRRSS MRO 


134146 
00018 
045042 
000012 
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134140 
000002 


000002 


TSTB a$TPS 3;WAIT UNTIL PRINTER IS READY 


BPL 10$ 7MJ0001 


MOVB 2(SP) ,a$TPB ;;LOAD CHAR TO BE TYPED INTO DATA REG. 
CMPB #CR,2(SP) 221S ape A CARRIAGE RETURN? 


BNE $ H IF NO 
CLRB SCHARCNT ::YES~=CLEAR CHARACTER COUNT 
BR STYPEX T 
1$: CMPB ALF ,2(SP) 331S CHARACTER A LINE FEED? 
STYPEX CH_IF YES 


Y 
INC2 (PC)+ 7:COUNT THE CHARACTER 
SCHARCNT: WORD 0 7sCHARACTER COUNT STORAGE 
$STYPEX: RTS PC 


.SBTTL BINARY TO OCTAL (ASCII) AND TYPE 

Ss RERAAERAEEAEREEREAEEEEKREEEEEEREEKREERKEEEEREAEREEKEKEEREEEEREEKERERKEEE 

*THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 6-DIGIT 
>*OCTAL (ASCII) NUMBER AND TYPE IT 

i s$TYPOS---ENTER HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGIVS TO TYPE 


3*CALL: 

3* MOV NUM, - (SP) ; NUMBER TO BE TYPED 

7* TYPOS 7:CALL FOR TYPEOUT 

:* -BYTE N :zN=1 TO 6 FOR NUMBER OF DIGITS TO TYPE 
3* -BYTE ™ :zM=1 OR O 

te 3231=TYPE LEADING ZERUS 

” :;0=SUPPRESS LEADING ZEROS 


i "$TYPON-==-ENTER | HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 
i s$TYPOS OR $TYPO 


he a NUM ,- (SP) > NUMBER TO BE TYPED 
.” TYPON 7:CALL FOR TYPEOUT 
-«* 

hy ashe nat HERE FOR TYPEOUT OF A 16 BIT NUMBER 
** 4 

tn MOV NUM, =(SP) ; ;NUMBER TO BE TYPED 


a? TYPOC ;CALL FOR TYPEOUT 
STYPOS: MOV a(SP) ,-(SP) 3 PICK UP _THE MODE 
MOVB 1(SP) , SOF ILL ;zLOAD ZERO FILL SWITCH 
MOVB (SP)+,$OMODE+1 ;;NUMBER OF DIGITS TO TYPE 
SP S EADJUST RETURN ADDRESS 


BR YPON 
$TYPOC: MOVB #1,S$0F ILL SET THE ZERO FILL SWITCH 
MOVB #6, SOMODE +1 SISET FOR S1X(6) DIGITS 
STYPON: —_ #5, SOCNT a ITERATION COUNT 


V R3,-(SP) ry. 
MOV R4,-(SP) 72SAVE RS 
MOV R5,~(SP) ci gave R5 
++ a E+1,R4 T THE NUMBER OF DIGITS TO TYPE 
ADD #6,R4 $f eg IT FOR MAX. ALLOWED 
MOVB R4 , SOMODE SAVE IT FOR USE 
MOVB SOF ILL .R4 :GET THE ZERO FILL SWITCH 
MOV 12(SP) ,R5 7:PICKUP THE INPUT NUMBER 
CLR 7sCLEAR THE OUTPUT WORD 
1$ ROL R5 >:ROTATE MSB INTO "'C’’ 
BR 3$ 3:G0 DO MSB 


SEQUENCE 209 


j 
} 4 
————————ooooeEEeEeEeEeEeEeEeEeEeEeEeEeEeEeEeeeeeee ee 


| . 7 
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BINARY TO OCTAL (ASCII) AND TYPE 


8146 
8147 





112737 
Arig 4 


00040 
112737 


045272 
177770 


000060 
000040 
045266 
045266 
045270 


000002 


000001 
000001 


000001 


000004 


2$: 


3$: 


4$: 
5$: 
7$: 


6$: 


8$: 


SOCNT: 
SOF ILL: 
SOMODE : 


R 
SOMODE 


33FORM THIS DIGIT 


;;GET LSB OF THIS DIGIT 
i: TYPE. —_ DIGIT? 


ee :7GET RID OF JUNK 


3:DON'T SUPPRESS ANYMORE 0'S 
se ASCID IP ASCII 


7 3MAKE ASC F NOT ALREADY 
ee FOR TYPING 

O TYPE THIS DIGIT 
COUNT BY 1 


:3BR 4 MORE TO DO 


:BR I 
Z:INSURE LAST DIGIT ISN'T A BLANK 
::G0 DO MF came DIGIT 


Bs R3 
::SET THE STACK FOR RETURNING 


7 RETURN 
7; STORAGE FOR ASCII DIGIT 
7 TERMINATOR FOR TY 

32 O0CTAL 

3zZERO FILL SWITCH 

7 NUMBER OF DIGITS TO TYPE 


-SBTTL APT COMMUNICATIONS ROUTINE 


ey REE EERERERAEKEEKEEKEKEEREREREREKEEEREEREKEEKEEEKEEEEK 


1$: 


2$: 


#1,$FFLG 
#1, $MFLG 
SATYC 

#1,$FFLG 
RO,-(SP) 


R1,-(SP) 
SMFLG 


5$ 
esas - SENV 
#APTSPOOL , SENVM 


a4 (SP) ,RO 
#2,4(SP) 
SMSGTYPE 


RO SMSGAD 
(RO) + 


2$ 
SMSGAD , RO 
RO 


3:TO REPORT FATAL ERROR 
3;TO TYPE A MESSAGE 


TO ONLY REPORT FATAL ERROR 


3=PUSH RO ON STACK 
33PUSH R1_ON STACK 
¢ ¢ SHOULD TYPE A MESSAGE? 
3 IF NOT: 
; ;OPERAT ING UNDER APT? 
NOT: 


; : SHOULD SPOOL MESSAGES? 
NOT: BR 


LIF 
GET MESSAGE ADDR. 

: ;BUMP RETURN ADDR. 
7966 IF BONE W/ LAST XMISSION? 
::PUT ADDR IN MAILBOX 
+: FIND END OF MESSAGE 


3:SUB START OF MESSAGE 
33GE1 MESSAGE LNGTH IN WORDS 


SEQUENCE 210 


CKFPCCO FP11F FLTG PNT PRT C 
APT COMMUNICATIONS ROUTINE 


010037 001334 
Biel at 000004 
017637 
062766 
013746 
004737 


105737 
16 


8148 
8149 


022737 
001074 


MMMM AMI 
Rare 
eRS Aron 
— — 
=—Ooo0 
xSS 
* 
an 


RRRRRRRRERRRRERK 
Rees 

od 

y 

& 


D 1 
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MOV RO, $MSGLGT 


001316 MOV #4, SMSGTYPE 
045450 3$: MOV a4 (SP) ,4$ 
000004 ADD 4(SP 
MOV 177776, =(SP) 
JSR C,$TY 
4$: . WORD 
S$: 
10$ TSTB = SFFLG 
BEQ 12$ 
TST SENV 
BEQ 12$ 
11$: TST $MSGTYPE 
BNE $ 
001320 MOV a4(SP) , SFATAL 
000004 ADD #2,4(SP) 
INC SMSGTYPE 
12$:  CLRB  $FFLG 
CLRB $LFLG 
CLRB SMFLG 


MOV (SP)+,RO 
TS PC 
SMFLG: .BYTE 0 
$LFLG: .BYTE 0 


$SFFLG: .BYTE 0 


-EVEN 
APTSIZE=200 
APTENV=001 
APTSPOOL=100 
APTCSUP=040 


-SBTTL TTY INPUT ROUTINE 


SEQUENCE 211 


;3PUT LENGTH IN MAILBOX 
7;TELL APT TO TAKE MSG. 


:zPUT MSG ADDR IN JSR LINKAGE 
“BUMP RETURN ADDRESS 
PUSH 199776 ON STACK 
CALL TYPE MACRO 


3sSHOULD REPORT FATAL ERROR? 
731F NOT: BR 
: ee eee UNDER APT? 


:SFINISHED ay MESSAGE? 
GET ERROR a 
ADDR. 


;BUMP RETURN 

77 TELL abt TO TAKE ERROR 
3: CLEAR FATAL FLAG 
3:CLEAR LOG FLAG 
3zCLEAR MESSAGE FLAG 
:zPOP STACK INTO R1 
2 POP STACK INTO RO 

URN 


RET 
3 IMESSG. FLAG 
;LOG FLAG 
ZIFATAL FLAG 


DBE RISA EID IDOE ISIS IIIIIIIIDIOIIOIIOIIOIIUIOIOIOIOIUOIIIO I 
-ENABL LSB 

IBERIA IEE EOE IOIOIIO IOI II IOUUIIOI III TR ik thik 

3 *SOFTWARE SWITCH REGISTER CHANGE ROUTINE. 

:*RQUTINE IS ENTERED FROM THE TRAP HANDLER, AND WILL 

[*SERVICE THE TEST FOR CHANGE IN SOFTWARE SWITCH REGISTER TRAP CALL 
3 *WHEN OPERATING B+ te sun MODE . 


001140 $CKSWR: CMP #SWR :31$ THE SOFT~SWR SELECTED? 
BNE 5$ 3 CH IF NO 
TSTB = a$TKS 2: CHAR THERE ? 
BPL 15$ SIF NO, DON'T WAIT AROUND 
MOVB TKB,-(SP) t:SAVE "HE CHAR 
BIC #°C177, (SP) 2 STRIP-OFF THE ASCII 
CMP #7, (SP5+ 1S IT A CONTROL G? 
BNE 15$ o3i3. RETURN TO USER 
000001 CMPB = $AUTOB,, #1 TARE WE RUNNING IN AUTO-MODE? 
BEQ 15$ : BRANCH IF YES 
TYPE ,SCNTLG > ECHO CONTROL-G (*G) 
$GTSWR: TYPE * $MSWR S: TYPE CURRENT CONTENTS 
MOV SWREG, - (SP) tISAVE SWREG FOR TYPEOUT 
TYPOC 7260 TYPE -“OC TAL ASCII(ALL DIGITS) 
TYPE /SMNEW ‘PROMPT FOR NEW SWR 
19$: CLR =(SP) *:CLEAR COUNTER 


CKFPCCO FPI11F FLTG PNT PRT C 
TTY INPUT ROUTINE 





042716 


133304 
133300 
177600 
000025 


046154 
000006 


000015 
000004 
000002 


000006 
001313 
001135 


000100 
044724 
000060 
060067 


000060 
000002 


000002 
177776 
001312 


000004 
133104 
133100 
177600 
000004 
133052 


133046 
177600 


E—E 1 
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133224 


000001 
133202 


000002 


000004 
000004 
000023 


7$: 


9$: 


10$: 


17$: 


18$: 
.DSABL 


-(SP) 
a$TKS 
7$ 


a$TKB,-(SP) 
#°(177, (SP) 
(SP) ,#25 
10$ 
»SCNTLU 
6,SP 

19 

(SP) ,415 
16$ 

4 (SP) 

11$ 

2(SP) ,a@SWR 
#6,SP 
/$CRLF 
$INTAG, #1 
15$ 

#100, a$TKS 


PC ,STYPEC 
| a 


18$ 

(SP) ,467 
#60, (SP) + 
2(SP) 


2(SP) 
-2(SP), (SP) 
7$ 


$QUES 
20$ 


SEQUENCE 212 


32 THE NEW SWR 
3CHAR THERE? 
33 1IF NOT TRY AGAIN 


2 sPICK UP CHAR 
MAKE IT 7-BIT a 
:31S IT _ CONTROL -U 
H_ IF NOT 


i3YES, “ECHO CONTROL-U (“U) 
: IGNORE PREVIOUS INPUT 
:3LET’ S TRY IT AGAIN 
IT . <CR>? 


fs TTY KBD INTERRUPTS? 
7 RE-ENABLE TTY KBD INTERRUPTS 


; BRANCH IF YES 


zs H YES 
7zSTRIP-OFF ASCII 

:7:1IS THIS THE FIRST CHAR 
; BRANCH IF YES 

:zNO, SHIFT PRESENT 

32 CHAR OVER in MAKE 
25 ROOM FOR NEW ONE. 
KEEP COUNT OF CHAR 
::SET IN NEW CHAR 
32:GET THE NEXT ONE 

zi TYPE ?<CR><LF> 

sz SIMULATE CONTROL-U 


CLARA REE EREEEE EEE EERE KRERKEKREREREREREREEEEE EERE EEE 


2 *CALL 


* 
** 
* 

* 


$RDCHR: 


1$: 


2s: 


RDCHR 
RETURN HERE 


(SP) ,~(SP) 
4(SP) ,2(SP) 
a$TKS 


a$TKB,4 (SP) 
#°C<177>,4(SP) 
4(SP) .#25 


a$TKS 
2$ 


a$TKB,-(SP) 
#°(177, (SP) 


*THIS ROUTINE WILL INPUT A SINGLE CHARACTER FROM THE TTY 


37 INPUT A SINGLE CHARACTER FROM THE TTY 
2 CHARACTER IS ON THE STACK 
7zWITH PARITY BIT STRIPPED OFF 


3 =PUSH — — PC 


SAVE THE P 
SIWAIT FOR 
AC CTE 


32 HARA R 

; READ THE TTY 

2 2GET RID OF JUNK IF ANY 
71S IT A CONTROL-S? 

+ BRANCH IF NO 

2 WAIT FOR A CHARACTER 
;LOOP UNTIL ITS THERE 

::GET CHARACTER 

MAKE IT 7-BIT ASCII 


wr 
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TTY INPUT ROUTINE 
61 022627 000021 CMP (SP)+,#21 z:1S IT A CONTROL-Q? 
046110 001366 BNE 2$ ::1F NOT DISCARD IT 
112 000750 BR 1$ 7: YES, RESUME 
046114 026627 000004 000021 3$: CMP 4 (SP) ,#SXON +:1S IT A RANDOM XON? :RANOO1 
046122 001744 BEQ 1$ + BRANCH IF YES *RANOO1 
046124 026627 000004 000140 CMP 4(SP) ,#140 t:1S IT UPPER CASE? 
046132 002407 BLT 4$ + BRANCH IF YES 
61 26627 000004 000175 CMP 4(SP) #175 t:1S IT A SPECIAL CHAR? 
046142 3 BGT + BRANCH IF YES 
046144 042766 000040 000004 BIC #40,4(SP) : IT UPPER CASE 
046152 2 $: RTI 3360 BACK TO USER 
046154 136 125 015 $CNTLU: .ASCIZ /*U/<15><12> CONTROL ‘U"' 
046161 136 107 015 $CNTLG: .ASCIZ /*G/<15><12> FECONTROL "s 
046166 015 012 123 SMSWR: .ASCIZ ) 5><1 ae» 
ioe 046177 04 040 116 $MNEW: .ASCIZ NEW = 
8151 .SBTTL TRAP DECODER 
LRA REE A RE REREEEEEE EERE ERERERRERRERRERREE 
2 *THIS ROUTINE WILL PICKUP THE LOWER BYTE OF THE ‘‘TRAP’' INSTRUCTION 
‘AND USE IT TO INDEX THROUGH THE TRAP TABLE FOR THE STARTING ADDRESS 
:*OF THE DESIRED ROUTINE. THEN USING THE ADDRESS OBTAINED I7 WILL 
**GO TO THAT ROUTINE. 
046210 010046 $TRAP: MOV RO,-(SP) Z:SAVE RO 
046212 016600 000002 MOV 2(SP) ,RO ;7GET TRAP ADDRESS 
046216 005740 TST =(RO) KUP BY 2 
6220 111000 MOVB _— (RO) ,RO 33GET RIGHT BYTE OF TRAP 
046222 300 ASL RO *POSITION FOR INDEXING 
046224 016000 046244 MoV $TRPAD (RO) ,RO i 3 INDEX TO TABLE 
046230 000200 R *GO TO ROUTINE 
3: THIS Is Tse TO HANDLE THE “'GETPRI'’ MACRO 
046232 011646 $TRAP2: MOV -(SP) 3:MOVE THE PC DOWN 
6234 016666 000004 000002 MOV Sess, 2(SP) +:MOVE THE PSW DOWN 
046242 000002 RTI ::RESTORE THE PSW 
.SBTTL TRAP TABLE 
:*THIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED 
**BY THE ‘TRAP’ INSTRUCTION. 
; ROUT INE 
046244 046232 $TRPAD: .WORD  $TRAP2 
046246 044506 $TYPE ;;CALL=TYPE TRAP+1(104401) TTY TYPEOUT ROUTINE 
046250 045072 $TYPOC ::CALL=TYPOC  TRAP+2(104402) TYPE OCTAL NUMBER (WITH LEADING ZEROS) 
6252 045046 $TYPOS ::CALL=TYPOS | TRAP+3(104403) TYPE OCTAL NUMBER (NO LEADING ZEROS) 
046254 045106 STYPON ;;CALL=TYPON TRAP+4(104404) TYPE OCTAL NUMBER (AS PER LAST CALL) 
56 045612 $GTSWR ::CALL=GTSWR § TRAP+5(104405) GET SOFT-SWR SETTING 
046260 045542 $CKSWR ::CALL=CKSWR §TRAP+6(1044 TEST FOR CHANGE IN SOFT-SWR 
6262 046024 SRDCHR ::CALL=RDCHR | TRAP+7(104407) TTY TYPEIN CHARACTER ROUTINE 
046264 044410 SSAVREG ::CALL=SAVREG TRAP+10(104410) SAVE RO-RS ROUTINE 
046266 044446 SRESREG ::CALL=RESREG TRAP+11(104411) RESTORE RO-R5 ROUTINE 
8152 046270 047364 -RSET = :CALL=RSETUP TRAP+12(104412) ROUTINE TO INITIALIZE AT END OF EACH TEST 
8153 046272 047356 "LPER ::CALL=LPERR § TRAP+13(104413) ROUTINE TO SET UP LOOP ON ERROR ADDRESS 
8154 000030 $TERM=.-$TRPAD 
8156 .SBTTL_ POWER DOWN AND UP ROUTINES 
FERRARA EERE RRERE REAR EERE EEE 
“POWER DOWN ROUTINE 
046274 012737 046452 000024 $PWRDN: MOV #SILLUP, a#PWRVEC :gSET FOR FAST UP 
046 012737 000340 000026 MOV #340, AAPWRVEC+2 ::PRIO:7 





G 1 
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DOWN AND UP ROUTINES 





POWER 
046310 010046 MOV RO,-(SP) ::PUSH RO ON STACK 
| 046312 010146 MOV R1,-(SP) ‘PUSH R1 ON STACK 
046314 010246 MOV R2,-(SP) +:PUSH R2 ON STACK 
046316 34 MOV R3,-(SP) +:PUSH R3 ON STACK 
320 010446 MOV R4,-(SP) + =PUSH R4 ON STACK 
046322 010546 MOV R5,=(SP) +:PUSH RS ON STACK 
046324 017746 132610 MOV aSwR,-(SP) *:PUSH @SWR ON STACK 
046330 010637 046456 MOV SP, SSAVR6 T:SAVE SP 
046334 012737 046346 000024 MOV ASPWRUP,a#PWRVEC ::SET UP VECTOR 
046342 000000 HALT 
046344 000776 BR .-2 : ; HANG 
ettTT titi it itititittiititititit tt ittt titi titi i titi iii ris) 
“POWER vm ROUT INE 
046346 012737 046452 000024 $PWRUP: MSILLUP ,@#PWRVEC ;;SET FOR FAST DOWN 
046354 013706 046456 MOV SSAVR6, SP ::GET SP 
046360 005037 046456 CLR SSAVRE *:WAIT LOOP FOR THE TTY 
046364 005237 046456 1$: INC $SAVR6 ;:WAIT FOR THE INC 
046370 001375 BNE 1$ WORD 
046372 012677 132542 MOV (SP)+,aSWR + POP STACK INTO @SWR 
046376 012605 MOV (SP)+,R5 3 POP STACK INTO R5 
046400 012604 MOV (SP)+.R4 t:POP STACK INTO R4 
046402 012603 MOV (SP) +_R3 +:POP STACK INTO R3 
04 612602 MOV (SP) +_R2 ::POP STACK INTO R2 
06 012601 MOV (SP) +,R1 ;POP STACK INTO RI 
046410 012600 MOV (SP) +-RO ‘POP STACK INTO RO 
046412 012737 046274 000024 MOV #SPWRDN,@#PWRVEC :;SET UP THE POWER DOWN VECTOR 
046420 012737 000340 000026 MOV #340, aWPURVECS +2 ::PRIO:7 
046426 104401 TYPE :REPORT THE POWER FAILURE 
046430 047434 SPWRMG: .WORD POWERM [POWER FAIL MESSAGE POINTER 
046432 012716 MOV (PC)+, (SP) 3 TRESTART AT START 
046434 006116 SPWRAD: .WORD “RESTART ADDRESS 
046436 042766 000020 000002 BIC a 2¢SP) £2 CLEAR “T'' BIT 
046444 005037 043474 CLR *CLEAR THE ''T’' BIT FLAG 
046450 000002 RTI 
046452 000000 SILLUP: HALT ;THE POWER UP SEQUENCE WAS STARTED 
046454 000776 BR .-2 33 BEFORE THE POWER DOWN WAS COMPLETE 
at 046456 000000 SSAVR6: 0 ::PUT THE SP HERE 
8158 
8159 .SBTTL ERROR TYPE OUT ROUTINE 
8160 PERERA RERERERREREREEEEEEEEEEEKEEEREEEEEREEREREAEEREREEREEREREKE 
TIT ITIL ITIL LLL TE ELLE LEE LLL LLL kkk kd ik 
8161 <STHIS ROUTINE IS CALLED TO TYPE AN ERROR MESSAGE WHICH IS INCLUDED 
8162 >*IN THE ERROR MESSAGE DATA TABLE. IT IS CALLED BY THE SERROR ROUTINE 
8163 **OR BY FIRST SETTING $ITEMB EQUAL TO THE ERROR TABLE ITEM TO BE PRINTED 
8164  *OUT AND THEN ECECUTING A: 
8165 : JSR PC .ERTYPE 
8167 046460 104401 ERTYPE: TYPE ; TYPE A CRLF 
8168 046462 001313 .WORD $CRL 
8169 046464 113737 001102 001232 MOVB He $TMPO 
8170 046472 042737 177400 001232 BIC #177400, $TMPO 
8171 046500 013737 001116 001234 MOV SERRPC,$TMP1 GET PC OF CALL 
8172 046506 010046 MOV RO,-(SP) TSAVE R 
8173 046510 117700 132520 MOVB  a$TMP1_RO ‘GET THE ITEM NUMBER. 
8174 046514 042700 177400 BIC #177400,R0 


8175 046520 001006 





eee 


I 
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ERROR TYPE OUT ROUTINE 
8176 046522 013746 001116 MOV SERRPC,-(SP)  ;MOVE ERROR PC To. STACK FOR PRINTING 
| 8177 046526 104402 TYPOC ‘GO TYPE THE ERROR PC 
8178 046530 104401 001313 TYPE , SCRLF sTYPE A <CRLF> 
| 8179 046534 000561 BR ERTS “BRANCH TO EXIT 
8180 046536 022700 000377 21$: CMP #377,R0 
8181 046542 001004 BNE 0$ 
8182 046544 017600 000004 MOV a4 (SP) ,RO 
8183 046550 700 000400 ADD »RO 
8184 010037 047104 20$: MOV RO, ERRNUM :SAVE THE ERROR # FOR POSSIBLE USE :DPMOO1 
8185 046560 005300 DEC RO SOTHERWISE MAKE RO AN 
8186 046562 006300 ASL RO ‘INDEX FOR THE TABLE. 
8187 046564 006300 ASL RO 
8188 046566 006300 ASL RO 
8189 046570 062700 001442 ADD #SERRTB,RO 
8190 046574 012037 046604 22$: MOV (RO) +, 2$ :PICK UP THE ADDRESS 
8191 046600 001406 BEQ 3$ [OF THE EM, ERROR MESSAGE 
8192 046602 104401 TYPE 
8193 046604 000000 2$: ,WORD 0 
8194 046606 004737 047106 JSR PC,PASCIZ :GO CHECK FOR AND PRINT ANY ADDTL ASCIZ ;DPMOO1 
8195 046612 104401 001313 TYPE  ,$CRLF 
8196 046616 012037 046626 3S: MOV (RO)+,4$ :GET THE DH,DATA HEADER 
8197 046622 001406 BEQ 5$ 
8198 046624 104401 TYPE 
8199 046626 000000 4$: .WORD 0 
8200 046630 004737 047106 JSR PC,PASCIZ :GO CHECK FOR AND PRINT ANY ADDTL ASCIZ ;DPMO01 
8201 046634 104401 TYPE 
8202 046636 001313 .WORD  $CRLF 
8203 046640 010146 5$: MOV R1,-(SP) ;SAVE R1,R2 AND R3 
8204 046642 010246 MOV R2.-(SP) 
8205 4 010346 MOV R3.-(SP) 
8206 046646 012001 MOV (RO) +,R1 ;GET THE ADDRESS A THE DATA TABLE. 
8207 046650 001506 BEQ ERT SRETURN IF NO DAT 
8208 046652 011000 MOV (RO) ,RO :GET A POINTER 10 THE DATA FORMAT TABLE. 
09 046654 105710 ERT1: TSTB (RO) SFORMAT ZERO? 
8210 046656 001003 BNE 7$ 
8211 046660 013146 MOV a(R1)+,-(SP)  ;FORMAT ZERO SO TYPE 
8212 046662 104402 TYPOC SAN OCTAL NUMBER. 
8213 046664 000473 BR ERT2 
8214 046666 122710 000002 7$: CMPB ss #2, (RO) ZFORMAT TWO? 
8215 046672 001010 BNE 9$ 
8216 046674 013102 MOV a(R1)+,R2 sFORMAT TWO SO TYPE TWO 
8217 046676 012246 MOV (R2)+,-(SP) SOCTAL NUMBERS. 
8218 046700 104402 TYPOC 
8219 046702 104401 TYPE 
82 6704 047500 .WORD SPACE 
8221 046706 011246 MOV (R2) ,-(SP) 
8222 046710 104402 TYPOC 
8223 046712 000460 BR ERT2 
8224 046714 122710 000003 9$: CMPB ss #3, (RO) :FORMAT THRTE? 
8225 046720 001011 BNE 10$ 
8226 046722 013102 MOV a(R1)+,R2 :FORMAT THREE SO TYPE 4 OCTAL NUMBERS. 
8227 046724 012703 000004 MOV #4,R ‘LOOP COUNTER 
8228 046730 012246 90$: MOV (R2)+,=(SP) *MOVE DATA TO THE STACK 
8229 046732 104402 TYPOC ‘TYPE AN OCTAL NUMBER 


30 046734 104401 TYPE TYPE A SPACE 
8231 046736 047500 . WOR SPACE 
8232 046740 077305 SOB R3,90$ ; SUBTRACT 1 AND BRANCH IF NOT DONE YET ;DPMOO1 


_ 
=) 





me. 





8233 046742 
8234 4G 


8245 046776 
8246 047000 
8247 047002 
8248 047006 
8249 047010 


8276 
8277 047104 


~ 


CKFPCCO FP11F FLTG PNT PRT C 
ERROR TYPE OUT ROUTINE 


000004 


000005 
046776 


000011 
047016 


000012 


000006 








ie *~ 
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ERT2 sEXIT 
o3o—e FORMAT FOUR? 


@(R1)+,-(SP) ;FORMAR FOUR SO TYPE 
SAN OCTAL NUMBER 


16 ; SUPPRESSING LEADING ZEROES. 

ERT2 

— FORMAT FIVE? 

(R1)+,12$ FORMAT FIVE SO TYPE AN 
sASCIZ STRING. 

ERTS 

SU a FORMAT ELEVEN? 

a(R1)+,14$ FORMAT ELEVEN SO PICK 
s;A_POINTER TO AN ASCIZ 
STRING. 

ERT3 

21g - tne FORMAT TWELVE? 

a(R1)+,R2 FORMAT TWELVE SO TYPE 

#6 ,R3 ;TYPE SIX OCTAL NUMBERS 

(R2)+,=(SP) 

SPACE 

R3,16$ 

ERT2 
UNDEFINED FORMAT FOR DATA????? 
[PRINT A TAB AFTER TYPING A DATA TABLE ENTRY 

$TAB OF ALL FORMATS EXCEPT ASCIZ, FORMATS 5 OR 11 

RO :POINT TO THE NEXT FORMAT 

(R1) END OF DATA TABLE. 

ERT1 
: DONE. 

SCRLF 

(SP) +,R3 RESTORE R1,R2 AND R3 

(SP)+,R2 

(SP)+,R1 

(SP)+,RO ;RESTORE RO. 

PC AND RETURN. 


0 ;LOCATION TO HOLD CURRENT ERROR NUMBER ;DPMO01 
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SUBROUTINE TO LOOK FOR ANY ADDITIONAL MSGS TO PRIN 


8278 -SBTTL SUBROUTINE TO LOOK FOR ANY ADDITIONAL MSGS TO PRINT 
8279 047106 010446 PASCIZ: MOV R4,-(SP) i SAVE R4 ;DPM001 
©) 047110 013704 044504 1$: MOV EQASCI ,R4 sMOVE END OF ASCII ADDRESS TO R4 ;DPM001 
8281 047114 122714 000377 CMPB fe (R4) 7 SEE A ADD'L MSGS NEED TO BE PRINTED ;DPMOO1 
8282 047120 001013 BNE BRANCH IF NOT ;DPMO001 
8283 047122 005204 INC Re : INCREMENT TO NEXT BYTE ;DPMO01 
8284 047124 032704 000001 BIT #B1TO0,R4 7SEE IF ODD ADDRESS ;DPMO01 
8285 047130 001401 BEQ 2$ BRANCH IF NOT ;DPMO01 
8286 047132 005204 INC R4 :POINT TO WORD ADDRESS ;DPMO01 
8287 047134 012437 047144 2$: MOV (R4)+,3$ ;MOVE ADDRESS TO LOCATION FOR TYPING ;DPM001 
8288 047140 001763 BEQ 1$ GO CHK FOR MORE MSG ADRS‘S IF NO MORE ;DPMO01 
8289 047142 104401 TYPE TYPE THE MESSAGE, ADDRESS IN NEXT WORD ;DPMOQ1 
8290 047144 000000 3$: -WORD 0 ZLOCATION FOR MESSAGE ADDRESS 3DPMO01 
8291 047146 000772 BR 2$ BRANCH BACK TO LOAD OTHER MESSAGES :DPMO01 
8292 047150 122714 000376 4$: CMPB #376, (R4) SEE IF SPECIFIC MSGS NEED PRINTING :DPM001 
8293 047154 001027 BNE 11$ BRANCH TO EXIT IF NOT :DPM001 
8294 047156 005204 INC R4 ; INCREMENT TO NEXT BYTE ;DPMO01 
8295 047160 032704 000001 BIT #B1T00,R4 7SEE IF ODD ADDRESS ;DPM001 
8296 047164 001404 BEQ 5$ BRANCH IF NOT :DPMO001 
8297 047166 005204 INC R4 :POINT TO WORD ADDRESS :DPM001 
8298 047170 ©05046 5$: CLR -(SP) CLEAR COUNTER LOCATION ON STACK :DPM001 
8299 047172 005216 6$: INC (SP) INCREMENT COUNTER ;DPM001 
8300 047174 0623724 047104 CMP ERRNUM, (R4) + [SEE IF ITEM NUMBER MATCHES ERROR :DPMO001 
8301 047200 001374 BNE 6$ ;BRANCH IF NOT TO SEARCH AGAIN :DPM001 
8302 047202 095724 7$: TST (R4)+ :SEE IF AT TERMINATOR YET ;DPMO01 
8303 047204 001376 BNE 7$ SBRANCH BACK UNTIL IT IS ;DPMO01 
8304 047206 005744 TST -(R4) PUT R4 AT_THE TERMINATOR 7DPMO001 
8305 047210 005724 8$: TST (R4)+ POINT R4 TO NEXT ADDRESS ;DPMO001 
8306 047212 005316 DEC (SP) SEE IF COUNTER DOWN TO ZERO YET :DPM001 
8307 047214 001375 BNE 8$ ;BRANCH BACK IF NOT TO ADVANCE R4 :DPM001 
8308 047216 005726 9$: TST (SP)+ POP COUNTER OFF STACK :DPM001 
8309 047220 011437 047230 MOV (R4) ,10$ MOVE “eR TO RSCATIS TO TYPE ;DPM001 
8310 047224 001403 BEQ 11$ . [BRANCH IF NO EXTRA MESSAGE TO PRINT :DPMO01 
8311 047226 104401 TYPE TYPE THE ASCII MESSAGE :DPMOO1 
8312 047230 000000 10$: -WORD 0 [LOCATION FOR ASCII MESSAGE ADDRESS :DPMO01 
8313 047232 000726 BR 1$ :GO BACK TO MAKE SURE NO MORE MSGS :DPMO01 
8314 047234 012604 118: MOV (SP)+,R4 RESTORE R4 ;DPM001 


8315 047236 000207 RTS PC sEXIT ;DPMO001 
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FPP SPURIOUS TRAP TO 244 HANDLER 
8316 .SBTTL FPP SPURIOUS TRAP TO 244 HANDLER 
8317 SLR REE EERE REE RE RRR RERREREREERERRE REE EE 
FERRARA EE EEERREEEREEEEEREERAEEERREERERERERERE KEE 
8318 :STHIS ROUTINE HANDLES UNEXPECTED TRAPS TO THE FPP TRAP VECTOR AT 244. 
8319 ‘THE LAST FPP INSTRUCTION EXECUTED AND ITS ADDRESS HAS BEEN RECORDED 
8320 ; * THESE ALONG WITH THE FEC, FPS AND PC OF TRAP ARE REPORTED. 
8322 047240 042737 000001 177572 EPSPUR: BIC #81T00,MMRO :MAKE SURE MEMORY MANAGEMENT IS OFF :DPMO01 
047246 011637 001236 MOV (SP) ,$TMP2 *SAVE PC OF TRAP. 
8324 047252 022626 MP (SP)+, (SP) + SRESTORE SP. 
8325 0472 70200 STFPS R “GET FPS 
8326 047256 010037 001240 V RO, STMP3 “MOVE IT TO $TMP3 
8327 047262 170300 STST RO ‘GET FEC 
8328 047264 010037 001242 MOV RO, $TMP4 ‘MOVE IT TO $TMP4 
8329 047270 104377 ERROR +3 377 :CALL ERROR 
8330 047272 1 WORD TERROR #441 
8331 047274 104412 RSETUP “GO INITIALIZE THE FPS AND STACK: AND 
“SEE IF THE USER HAS EXPRESSED 
STHE DESIRE TO CHANGE THE SOFTWARE 
SVIRTUAL CONSOLE SWITCH REGISTER (HAS 
‘THE USER TYPED CONTROL G?). 
8332 047276 000137 043202 JMP SEOP : JUMP TO SEOP 


Se --— 5 
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CPU SPURIOUS TRAP TO 4 HANDLER 


8333 -SBTTL CPU SPURIOUS TRAP TO 4 HANDLER 
8334 DSRS ASSO SIIIIIISI IIIS IISIOUIIOIOIOIIDD IO IIDD Eiht tittt 
eT ITI tict iit iit itis iti i iii iiii tii isiii iii iii iii 
iti ; THIS ROUTINE REPORTS UNEXPECTED CPU TRAPS TO VECTOR 4. 
8337 047302 042737 000001 177572 iPSPUR: ak #B1T00 ,MMRO sMAKE SURE — MANAGEMENT IS OFF ;DPMO01 
8338 047310 011637 001236 (SP) ,STMP2 SAVE PC_OF T 
8339 047314 022626 CMP (SP)+, (SP)+ CLEAN STACK 
8340 047316 104377 ERROR +377 ;CALL ERROR 
8341 047320 000042 «WORD 42 TERROR #442 
8342 047322 104412 RSETUP 3GO INITIALIZE THE FPS AND STACK; AND 


7SEE IF THE USER HAS EXPRESSED 
;THE DESIRE TO CHANGE THE SOF TWARE 
VIRTUAL CONSOLE SWITCH — (HAS 
, ; THE — TYPED CONTROL G?) 
8343 047324 000137 043202 JMP $SEOP ;JUMP TO $SEOP 
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CPU SPURIOUS TRAP TO 10 HANDLE 


8344 
8345 









8347 

8348 047330 042737 000001 
8349 047336 011637 001236 
8350 047342 022626 

8351 047344 104377 

8352 047346 000043 

8353 047350 104412 





8354 047352 000137 043202 


177572 


iPTwo: 


1$: 


M 1 
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-SBTTL CPU SPURIOUS TRAP TO 10 HANDLER 


J RRR EREAEERAR EERE EEERERERERRREERREREERREE 
TTT TTT TLL ELLE LLL LLL ELLE LLL LEE LLL LLL LL 


; #THIS ROUTINE REPORTS UNEXPECTED CPU TRAPS TO VECTOR 10. 


JMP 


#81T00,MMRO 
(SP), $TMP2 
(SP)+, (SP)+ 
al 


SEOP 


MAKE SURE MEMORY MANAGEMENT IS OFF 
SAVE PC_OF TRAP. 
7CLEAN STACK 
:CALL_ERROR 


TERROR #443 

:60 a ee ae THE FPS AND STACK; AND 
SEE IF THE USER HAS EXPRESSED 

¢ THE DESIRE TO CHANGE THE SOFTWARE 
VIRTUAL CONSOLE SWITCH — (HAS 
3 THE = TYPED CONTROL G?) 

; JUMP TO $EOP 


SEQUENCE 


:DPMO01 
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SET LOOP ON ERROR ADDRESS ROUTINE 


8355 
8356 


8357 
8358 047356 011637 001110 
8359 047362 000002 


N 
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-SBTTL SET LOOP ON ERROR ADDRESS ROUTINE 


SERRA RARER ARERR EERE EER AERA ARERR RRR RARER RATA eee 

FERRER RAE ARERR AAA ARER Eee 

-® 

LPER: MOV (SP), $LPERR 
RTI 


1 
SEQUENCE 221 
| 
| 
; 





FLAG RESET AND 


8368 

8369 047364 
8370 047372 
8371 047374 


8372 
8373 047376 


8378 047426 
8379 430 
8380 047432 


OLE 


023727 
001001 
104406 
012737 


CKFPCCO FP11F FLTG PNT PRT C 
ONS EST ROUT 


177570 


000244 
000004 
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-SBTTL FLAG RESET AND CONSOLE TEST ROUTINE 


2a REEEAAEAAAAAEAEAEAAAAEAAAARAEAEAEEAREREREEAARAERAAAEEARAARARAAEARERERERERERKE 


+L RRRRRRRER AERA AREA AEAAEERAERRARAARRARERAARERE ARERR ERE E TREE 
:*THIS ROUTINE WILL BE CALLED AT THE END OF EACH TEST TO 
; *RESET THE STACK, CLEAR THE FPS AND SEE IF THE USER HAS TYPED 

* CONTROL G ON THE TERMINAL. IF THE USER HAS TYPED CONTROL G AND 
‘ #THERE IS NO PHYSICAL CONSOLE SWITCH REGISTER THEN THE CONTENTS 
*OF THE SOFTWARE SWITCH REGISTER Bs BE TYPED IN OCTAL ON THE 
; * TELETYPE AND THE USER CAN MODIFY IT. 


"RSET: CMP SWR,#177570 SEE IF THERE IS A PHYSICAL CONSOLE SWITCH REGISTER. 

BNE 1$ [BRANCH IF NOT 

CKSWR “OTHERWISE TYPE THE CONTENTS OF THE PROGRAM VIRTUAL 

‘SWITCH REGISTER AND GIVE THE USER CHANCE TO MODIFY IT 

1$: MOV #FPSPUR,FPVECT 

MOV #CPSPUR,ERRVECT 

MOV #CPTWO, 10 

MOV (SP) ,RO ;SAVE RETURN ADDRESS. 

MOV #STACK, SP SRESET THE STACK POINTER. 

CLR R4 “CLEAR THE FPS 

LDFPS RG 

MP (RO) RETURN. 








-— 
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SPECIAL MESSAGES 


-SBTTL SPECIAL MESSAGES 


382 0474 200 120 117 : .ASCIZ <CRLF>'POWER FAILURE. PROGRAM RESTARTING. * 
8383 047500 040 040 000 SPACE: .ASCIZ ‘  ° 
8384 047503 011 000 $TAB:  .ASCIZ <TAB> 
8385 047505 107 117 124 MS1: eASCIZ ‘GOT RESULT: *<TAB><TAB> 
386 047523 105 130 120 MS2: -ASCIZ ‘EXPECTED RESULT: '<TAB> 
8387 047545 101 103 040 MS3: eASCIZ ‘AC OPERAND: '<TAB><TAB- 
047 123 117 125 MS4 -ASCIZ ‘SOURCE OPERAND: '<TAB> 
8389 047545 MS10 
8390 047605 105 130 120 MS11:  .ASCIZ ‘EXPONENT OPERAND: *<TAB> 
8391 047630 114 117 101 MS20: .ASCIZ ‘LOADED: *<TAB><TAB> 
8392 047642 124 122 111 MS21: .ASCIZ ‘TRIED TO LOAD: *<TAB> 


ma 
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ERROR MESSAGES 


8393 .SBTTL ERROR MESSAGES 
8413 047662 123 000 EMI:  <ASCIZ iS! 
8414 047664 377 y 1 377 FLAGS ‘ERTYPE’ TO PRINT ADDT‘L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
8415 047666 047676 047707 047726 "WORD EM1B,EM1C,EM1D,0 
8416 047676 = 124~=Ss«d106—Ss«(40 ss EMIB: ~=—-CASCIZ_sITF A,AC 
8417 047707 040 104 111 EMIC: <:ASCIZ ! DID’NOT TRAP.! 
8418 047726 106 111 EMID: ‘ASCIZ ! FID=0.! 
8419 047736 —s- 123 EM2: :ASCIZ Si. 
8420 047740 377 yg 1h 377 FLAGS ‘ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
8421 047742 047676 047752 047726 “WORD. EM1B,EM2B,EM1D,0 
8422 047752 © 056.—Ss—i«iH—“(<téi SEM: ~©=-ASCIZ }. FPS BAD. 
8423 047766 123 000 EM3: .ASCIZ !S! 
8424 047770 377 y i 377 zFLAGS ‘ERTYPE' TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
8425 047772 047676 050002 047726 "WORD EM1B,EM3B,EM1D,0 
8426 050002 056 ~=Ss«i40Ssi(«é‘zGSCEM3B: = CASCIZ }. FEC BAD. | 
8427 050016 123 000 EM4: :ASCIZ }S! 
8428 050020 377 yg SA 377 FLAGS ‘ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
8429 050022 050034 050045 050057 “WORD EMA, EM4B,EM4C,EM4D,.0 
8430 050034 124 106 040 EMSA: -ASCIZ iTF A(R)! 
8431 050045 056 040 122 EM4B: :ASCIZ !. RO'BAD.! 
8432 050057 056 «= 040-S-—«i1006sFMGC: = CASCIZ !. FDST! 
8433 050066 0 106 101 EM4D: <cASCIZ ! FAILED.! 
8434 050077 +123 + ©—000 EMS: :ASCIZ !S! 
8435 050101 377 gS 377 FLAGS "ERTYPE* TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
8436 050102 050034 050066 000000 “WORD EMGA,EM4D,0 
8437 050110 123 ~—«:000 EM6:  :ASCIZ iS! 
8438 050112 377 g LS 377 ;FLAGS ‘ERTYPE' TO PRINT ADDT'’L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
8439 050114 050034 050057 050066 “WORD  EM4A,EM4C,EM4D , EMOC 
8440 050124 EMOC : 
050124 377 y id 377 FLAGS “ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
050126 050167 050164 050176 "WORD CRBUT, IFD,PRST.N7.NO.N7,WENTTO,N2.N4 NS, INSTOF .N2.N4 .N& ,0 

8441 050164 106 104 IFD: LASCIZ_ iFD! 
8442 050167 200 050 102 CRBUT: ‘ASCIZ <CRLF>! (BUT ! 
8443 050176 051 040 #123 PRST:  -ASCIZ |) ST 
8444 050204 040 127 105 WENTTO: :ASCIZ | WENT TO } 
8445 050216 040 111 116 INSTOF: .ASCIZ i: INSTEAD OF ' 
8446 050233 060 000 NO:  -ASCIZ 0! 

47 050235 061 000 Ni:  cASCIZ. !1! 
8448 (50237 9 062'-—Sts—=«é«i00? N2: :ASCIZ 2! 

49 050241 063 000 N3:  ASCIZ. !3! 
8450 050243 000 N4: ASCIZ !4! 
8451 050245 065 000 NS: cASCIZ !5! 
8452 050247 066 000 N6:  cASCIZ 6! 
8453 050251 067 000 N7: ASCIZ 17! 
8454 050253 123 000 EM?:  :ASCIZ 3S! 
8455 050255 377 “BYTE 377: FLAGS "ERTYPE' TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
8456 050256 050034 050272 050045 “WORD EM4A,EM7B,EM4B,EM4C.EM4D..0 
8457 050272 «053. «Ss«iS6~Ss«sSéEM7B: CASCIZ i +.! 
8458 050275 + ~=«-'123'—Sts—«00 EM10: :ASCIZ !S! 
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ERROR ME 
8459 050277 377 -BYTE 377 :FLAGS "ERTYPE' TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
8460 050300 050034 050272 050066 “WORD £&M4A,EM7B,EM4D,0 
8461 050310 123 000 EM11 ASCIZ :S! 
8462 050312 377 BYTE 377 :FLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
8463 050314 050326 050045 050057 “WORD EMT 1B MAB, EM4C,EM4D,0 
8464 050326 124 104 040 €M11B: .ASCIZ {TD A,(R) 
8465 050340 123 EMl2:  .ASCIZ !S! 
8466 050342 377 “BYTE 377 :FLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
8467 050344 050326 050066 000000 "WORD &M11B,EM4D,0 
8468 050352 123 000 EM13:  :ASCIZ 3S! 
8469 050354 377 -BYTE 377 :FLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
8470 050356 050364 050374 “WORD £M13A,EM13B,0 
8471 050364 124 104 040 EM13A: .ASCIZ {TD A.AN! 
8472 050374 040 124 122 EM13B: .ASCIZ ! TRAP TO 4 IN FDST.! 
8473 050352 EM14=EM13 
8474 050420 123 000 M15:  .ASCIZ {S! 
8475 050422 377 -BYTE 377 sFLAGS "ERTYPE’ TO PRINT ADDT'L ASCiZ MSGS, ADDRESSES 2 LINES DOWN 
8476 050424 050364 950066 "WORD EM13A, EMD 0 
8477 050432 120 103 040 EM16 ASCIZ [PC BAD AFTER S! 
8478 050451 377 -BYTE 377 sFLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
8479 050452 050364 000000 “WORD £M13A,0 
8480 050456 123 000 —M17:  .ASCIZ 3S! 
8481 050460 377 “BYTE 377 :FLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
8482 050462 050470 050374 “WORD  £M17B, EM138,0 
8483 050470 124 104 040 €M17B: .ASCIZ {TD A.-(R)! 
8484 050502 123 000 EM20: .ASCIZ 3S! 
8485 050504 377 “BYTE 377 FLAGS "ERTYPE' TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
8486 050506 050470 050045 050057 “WORD £&M17B,EM4B,EM4C,EM4D,0 
8487 050520 123 000 EM21:  .ASCIZ [S! 
8488 050522 377 -BYTE 377 :FLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
8489 050524 050470 050066 000000 "WORD €M17B,EM4D,0 
8490 050520 EM22=EM21 
8491 050532 123 000 3: .ASCIZ {S! 
8492 050534 377 -BYTE 377 sFLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
8493 050536 050544 050374 “WORD EM23B, EM13B,0 
8494 050544 124 104 040 EM23B:  -ASCIZ iTD A.a(R)+: 
8495 050557 123 EM24:  .ASCIZ ! 4 
8496 050561 377 -BYTE 377 :FLAGS "ERTYPE’ TO PRINT ADDT*L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
8497 050562 050544 050045 050057 “WORD £M23B,EM4B,EM4C,EM4D,0 
8498 050574 123 000 EM25: -ASCIZ [S! 
8499 050576 377 -BYTE 377 :FLAGS "ERTYPE’ TO PRINT ADDT*L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
8500 050600 050544 050066 000000 “WORD £M23B,EM4D,0 
8501 050606 123 000 EM26:  <:ASCIZ {S! 
8502 050610 377 “BYTE 377 :FLAGS ‘ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
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ERROR MESSAGES 


8503 050612 050620 050374 000000 .WORD &M268,EMi28,0 

8504 050620 124 104 040 EM26B: .ASCIZ {TD A.a@-(R)! 

8505 050633 123 000 EM27?:  .ASCIZ {S! 

8506 050635 377 “BYTE 377 sFLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 

8507 050636 050620 050045 050057 “WORD EM26B,EM4B,EM4C,EM4D,0 

8508 050650 123 000 EM30: .ASCIZ iS! 

8509 050652 377 “BYTE 377 :FLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 

8510 050654 050620 050066 000000 “WORD EM26B,EM4D,0 

8511 050662 123 000 —M31:  .ASCIZ iS! 

8512 050664 377 “BYTE 377 :FLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 

8513 050666 050674 050374 000000 "WORD €M31B,EM138,0 

8514 050674 124 104 040 EM31B: .ASCIZ {TD A.N(R)! 

8515 050706 123 000 EM32:  .ASCIZ !S! 

8516 050710 377 “BYTE 377 :FLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 

8517 050712 050674 050045 050057 “WORD &M31B,EM4B,EM4C.EM4D,0 

8518 050724 123 000 EM33:  .ASCIZ 3S! 

8519 050726 377 “BYTE 377 :FLAGS "ERTYPE* “QO PRINT ADDT'L ASCiZ MSGS, ADDRESSES 2 LINES DOWN 

8520 050730 050674 050066 000000 "WORD &M31B,EM4D,0 

8521 050736 123 000 EM34:  .ASCIZ [S! 

8522 050740 377 -BYTE 377 :FLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 

8523 050742 050750 050374 000000 "WORD &M34B,EM138,0 

8524 050750 124 104 040 EM34B: .ASCIZ {TD A.a@N(R): 

8525 050763 123 000 EM35:  .ASCIZ !S! 

8526 050765 377 -BYTE 377 :FLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 

8527 050766 050750 050045 050057 "WORD &M34B,EM4B,EM4C,EM4D,0 

8528 051000 123 000 EM36:  .ASCIZ /S! 

8529 051002 377 -BYTE 377 :FLAGS "ERTYPE’ TO PRINT ADDT’L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 

8530 051004 050750 050066 000000 "WORD &M34B,EM4D,0 

8531 051012 123 124 103 €M37:  <ASCIZ iSTCFD A,(R) FAILED. 

8532 051036 376 -BYTE 376 FLAGS TERT YPE® TO PRINT ERR # SPECIFIC ASCIZ MSGS. ADRS 3 LINES DOW 

8533 051040 000037 000042 000044 "WORD 37,42,44,45, 47. 50,0 

8534 051056 000000 051132 051245 “WORD 0,€M42B,6m448 mse. EM47B,EMS0B 

8535 051072 123 124 103 €M460:  <ASCIZ {STCFD A,(R)! 

8536 051106 376 “BYTE 376 iFLAGS "ERTYPE TO PRINT ERR # SPECIFIC ASCIZ MSGS, ADRS 3 LINES DOW 

8537 051110 000040 000041 000043 "WORD 40,41,43,46,0 | 

8538 051122 047752 050002 051166 "WORD £M2B,—M36,EM43B8,EM468 

8539 051072 EM41=EM40 

8540 051012 EM42=EM37 

8541 051132 200 111 116 EM42B: .ASCIZ <CRLF>! INVERT FDFL ST 767 FAILED. ! 

8542 051072 EM4 3=EM40 

8543 051166 056 040 106 EM438: .ASCIZ |. FPS BAD.! 

8544 051201 377 -BYTE 377 :FLAGS “ERTYPE* TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
051202 050167 051240 050176 "WORD CRBUT,1EZB1,PRST,NS.N6,NO,WENTTO,NO,N6.N1, INSTOF .N2.N6.N1.0 

8545 051240 051403 132 102 E781: | sASCIZ 'EZBT: 


8546 =EM3 
8547 051245 200 114 117 —M44B: .ASCIZ <CRLF>!LOW ORDER BITS OF X11 DID NOT GET O S? ““6.: 
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8548 051012 EM45=EM37 
8549 051322 200 050 102 EM45B: .ASCIZ <CRLF>: (BUT OP1C) ST 251 FAILED.: 
8550 051072 EM46=EM40 
8551 051355 056 040 106 EM46B: .ASCIZ i. FPS BAD.: 
8552 051370 377 Tan 377 sFLAGS ‘ERTYPE' TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
051372 050167 051240 050176 WORD CRBUT,IEZBT,PRST,.N4,N2.N1,WENTTO,N2,N6,N2, INSTOF ,NO,N6,N2,0 
051012 EM47=EM37 
8554 051430 040 000 EM47B: .ASCIZ i i 
8555 051432 377 yA 377 sFLAGS ‘ERTYPE® TO PRINT ADDT*L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
051434 050167 050164 050176 «WORD CRBUT,IFD,PRST,N1,.N1,N35,WENTTO,NG,N1,N5, INSTOF .N4,N1,N4,0 
051012 EMSO=EM37 
8557 051472 040 123 111 EMS5O0B: .ASCIZ i: SIGN BAD.: 
8558 051505 377 « 377 zFLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
051506 050167 mead 050176 -WORD_ CRBUT, IENBT.PRST.N5.N6, N7,WENTTO,NO,N6,NO, INSTOF .N4,N6,NO,0 
8559 051544 105 116 102 JENBT: .ASCIZ ‘ENBT: 
8560 051551 123 124 103 EMS1:  <:ASCIZ {STCDF A, (R); 
8561 051565 376 ye obes 376 FLAGS ‘ERTYPE* TO PRINT ERR # SPECIFIC ASCIZ MSGS, ADRS 3 LINES DOW 
8562 051566 000051 000054 000055 «WORD 51,54,55,60,0 
8563 051600 050066 051652 051716 :WORD  EM4D, EMSAB EMS5B,EM60B 
8564 051610 123 124 104 EM52: .ASCIZ iSTDA 
8565 051622 376 yg 376 PPLAGS *ERTYPE’ TO PRINT ERR # SPECIFIC ASCIZ MSGS, ADRS 3 LINES DOW 
8566 051624 000052 000053 000056 -WORD 52,53,56,57,61,0 
8567 051640 047752 050002 052007 “WORD EM2B,£M3B,EM568,—M57B,EM61B 
8568 051610 EMS3=EM52 
8569 051551 EMS4=EM51 
8570 051652 040 106 101 EM5S4B: .ASCIZ | FAILED.:<CRLF>! INVERT FDFL ST 767 FAILED.: 
8571 051551 EMS5=EM51 
8572 051716 200 122 117 EM55B: .ASCIZ <CRLF>:ROUND ERROR, OR: 
8573 051737 377 y 377 sFLAGS ‘ERTYPE' TO PRINT ADDT*L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
051740 050167 051776 050176 -WORD_ CRBUT, IBKOUT,PRST.N4,NO,NO,WENTTO, N7,.N6,N6, INSTOF ,N7,.N6,N7,0 
8574 051776 102 122 105 IBKOUT: .ASCIZ !BREAKOUT! 
8575 051610 EMS6=EMS2 
8576 052007 056 040 106 EM568: .ASCIZ :. FPS BAD.: 
8577 052022 377 y thd 377 zFLAGS “ERTYPE® TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
052024 050167 051240 050176 -WORD CRBUT,IEZBT,.PRST,.N4,N2,N1,WENTTO,NO,N6,N2, INSTOF .N2,N6.N2,0 
051610 EMS7=EMS2 
8579 052062 040 106 120 EM57B: .ASCIZ i FPS BAD. FIV=0.: 
8580 052103 377 Hi 377 :FLAGS ‘ERTYPE* TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
052104 050167 052142 050176 -WORD  CRBUT,IFIV,PRST.N2,N6,N2,WENTTO.N1,.N2,N3, INSTOF ,N1,NO,.N3.0 
8581 052142 106 111 126 IFIV: _.ASCIZ ‘FIV: 
8582 051551 EM60=EM51 
8583 052146 040 106 101 EM60B: .ASCIZ : FAILED. FIV=1. 
8584 052166 377 ghd 377 7 FLAGS ‘ERTYPE® TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
052170 050167 052142 050176 WORD CRBUT,IFIV,PRST.N2.N6,.N2,WENTTO,N1,NO.N3, INSTOF .N1,N2,.N35,0 


8585 M61=EM5S2 
8586 052226 056 040 106 EM61B: .ASCIZ i. FPS BAD.: 
8587 052241 377 -BYTE 377 zFLAGS "ERTYPE' TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 





ee ie FP11F FLTG PNT PRT C 
ERROR MESSAGES 


59800 050167 052300 
Ft 4 039 106 114 


123 124 
8390 O85313 377 


8591 052314 052324 047752 
104 040 


59 040 
8594 052336 377 
052340 050167 052376 
8595 052376 106 104 
8596 052403 123 124 
8597 052410 377 
8598 052412 052324 050002 
8599 052420 103 114 
8600 052463 377 
8601 052464 050066 000000 
103 114 


000 
8607 052514 103 114 
8608 052520 377 
8609 052522 052534 050045 
8610 052534 104 040 
8611 052542 
052542 103 114 
8612 052565 377 
052566 050167 052376 
8613 052624 
052624 103 114 
8614 052647 116 105 
8615 052656 377 
este 052660 050066 000000 
8617 052664 116 105 
8618 052673 377 
8619 052674 047752 000000 
8620 052700 116 105 
8621 052704 377 
8622 052706 052534 050066 
8623 052714 116 105 
8624 052720 377 
8625 052722 052534 050045 
8626 052730 116 105 
8627 052734 377 
8628 052736 052534 weak 


8629 052744 101 
8630 052750 377 


MACRO M1113 09-APR-81 


050176 WORD 
101 IFLAG: .ASCIZ 
103 EM62: -ASCIZ 

BYTE 
EVEN 
052334 WORD 
101 EM62A: .ASCIZ 
EM62B: .ASCIZ 
BYTE 

EVEN 

050176 ~ WORD 
123 IFDST: .ASCIZ 
103 EM63: -ASC1Z 

BYTE 
EVEN 

000 . WORD 

122 EM64: -ASCIZ 
J YTE 
.EVEN 
. D 

EM65: 

122 -ASCIZ 
BYTE 

122 EM66: -ASCIZ 
BYTE 
EVEN 

050057 . WORD 
050 EM66B: .ASCIZ 

EM67: 

122 -ASCIZ 
-BYTE 
~EVEN 

050176 . WORD 

EM70: 

122 -ASCIZ 

107 EM71: -ASCIZ 
BYTE 
EVEN 
. WORD 

107 EM72: -ASCIZ 
-BYTE 
EVEN 
WORD 

107 EM73: -ASCIZ 
BYTE 
-EVEN 

000000 WORD 
107 EM74: -ASCIZ 

-BYTE 
EVEN 

000000 WORD 

107 EM7S5: -ASCIZ 
BYTE 
-EVEN 

000000 WORD 

123. EM76: -ASCIZ 
BYTE 


H 2 
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SEQUENCE 228 


EE re SE LEE AE Sere Penne 


tSTCF i 


377 s"' AGS “ERTYPE' TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 


EM62A,EM2B,EM62B,0 
iD C6: 


377 ;FLAGS “ERTYPE' TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
CRAUT , IFDST.PRST.N7.N6,N7 .WENTTO,NS.N6.N7, INSTOF .NS .N7 .N7 0 


iSTCF: 
377 FLAGS ‘ERTYPE* TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


EM62A,E 


M38 ,0 
1 CLRD CR) FAILED! <CRLF>:ZERO X11 AT ST 770: 
377 FLAGS ‘ERTYPE* TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


EM4D 0 
atte (R). FPS BAD.: 


iCLRi 
377 FLAGS “ERTYPE* TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


EM66B ,EM4B ,EM4C,EM4D ,0 
iD (Rd: 


ESRD AC7. FPS BAD. 


77 :FLAGS ERT YPE" TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


E 


E 


E 


E 


CRBUT, IFDST,PRST,.N7,N7,NO,WENTTO,N6,NO,N7, INSTOF ,N6,N1,N7,0 


aa AC7. FEC BAD.: 


GF A: 
Sad FLAGS ‘ERTYPE* TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


EM4D,0 


NEGF A: 
aa zFLAGS ‘ERTYPE* TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


EM2B , 0 


tNEG: 
377 zFLAGS ‘ERTYPE' TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


EM66B.EM4D ,0 


377 ss FLAGS “ERTYPE* TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


EM66B,EM4B .0 


iNEG: 
377 FLAGS “ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


EM66B , EM2B ,0 


\ABS: 
377 FLAGS *FRTYPE® TO PRINT ADDT‘L ASCIZ MSGS, ADDRESSES 2 LINES 


PUP es pees 


ot gee 





CKFPCCO FP11F FLTG PNT PRT C 


ERROR MESSAGES 


8631 052752 
8632 052760 
8633 052767 
8634 053017 
8635 053023 
8636 053024 
8637 053032 
8638 053036 
8639 053040 
8640 053046 
8641 053052 
8642 053054 
8643 053062 
8644 053066 
8645 053070 
8646 053076 
8647 053105 
8648 053111 
8649 053112 
8650 053120 
8651 053124 
8652 gorge 
8653 053134 
8654 053140 
8655 053142 
8656 053150 
8657 053154 
8658 053156 
8659 053164 
8660 053174 
8661 053200 
8662 053202 
8663 So asie 
8664 053214 
8665 Oss 16 
8666 05322: 
8667 083930 
8668 053232 
8669 053240 
8670 053244 
8671 053246 
8672 053254 
8673 053260 


052760 
104 


377 


052767 
040 


052767 
040 
102 


050066 
102 


050045 
102 


047752 
102 
052767 
040 
105 


052767 
102 


050066 
102 


050045 
102 


047752 
105 


MACRO M1113 09-APR-81 


EVEN 

000000 D 
050 EM76A: .ASCIZ 
\¢¢ EM76B: .ASCIZ 
123 EM77: .ASCIZ 
-BYTE 

- EVEN 

000000 WORD 
123. €M100: .ASCIZ 
-BYTE 

-EVEN 

000000 - WORD 
123 EM101: .ASCIZ 
-BYTE 

-EVEN 

000000 D 
123 EM102: .ASCIZ 
-BYTE 

-EVEN 

000900 - WORD 
055 €&M102B: .ASCIZ 
123 EM103: .ASCIZ 
-BYTE 

- EVEN 

000000 - WORD 
123 EM104: .ASCIZ 

. YTE 

- EVEN 

000000 . WORD 
123 EM105: .ASCIZ 
-BYTE 

-EVEN 

000000 - WORD 
123 EM106: .ASCIZ 
-BYTE 

-EVEN 

000000 - WORD 
100 EM106B: .ASCIZ 
107 €M107: .ASCIZ 
-BYTE 

- EVEN 

000000 - WORD 
123 —M110: .ASCIZ 
-BYTE 

ye 
123. E—M111: .ASCIZ 
-BYTE 

-EVEN 

000000 - WORD 
123. EM112: .ASCIZ 
-BYTE 

- EVEN 

000000 D 
107 €M113: .ASCIZ 

eo YTE 


13:53 PAGE 4,8 


EM76A EM768, 0 
D (R)+! 


1ABS: 
377 ; FLAGS 
pee pres. 0 


ABS! 
$7 7FLAGS 


EM102B,EM4D,0 
TABS! 

377 : FLAGS 
EMT 028, EM4B,0 
377 : FLAGS 
EM102B.EM2B.0 
TABS | 

377 : FLAGS 
ENT 068, EM768.,0 
iNEG: 

377 : FLAGS 
EM66B,EM76B 0 
TABS} 

377 : FLAGS 
EM106B ,EM4D.0 
377, ss FLAGS 
EM] 068 EMBO 
ea] S FLAGS 


tNEG; 
377 FLAGS 


SRC MODE.: 
"ERTYPE* TO 


*ERTYPE® TO 


"ERTYPE’ TO 


*ERTYPE’ TO 


"ERTYPE’ TO 


*ERTYPE* TO 


"ERTYPE’ TO 


*ERTYPE’ TO 


"ERTYPE’ TO 


"ERTYPE' TO 


"ERTYPE’ TO 


"ERTYPE’ TO 


"ERTYPE’ TO 


PRINT 


PRINT 


PRINT 


PRINT 


PRINT 


PRINT 


PRINT 


PRINT 


PRINT 


PRINT 


PRINT 


PRINT 


PRINT 


ADDT'L 


ADDT'L 


ADDT'L 


ADDT'L 


ADDT*L 


ADDT*L 


ADDT'L 


ADDT*L 


ADDT*L 


ADDT'L 


ADDT*L 


ADDT'L 


ADDT*L 


ASCIZ MSGS, 


ASCIZ MSGS, 


ASCIZ MSGS, 


ASCIZ MSGS, 


ASCIZ MSGS, 


ASCIZ MSGS, 


ASCIZ MSGS, 


ASCIZ MSGS, 


ASCIZ MSGS, 


ASCIZ MSGS, 


ASCIZ MSGS, 


ASCIZ MSGS, 


ASCIZ MSGS, 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


SEQUENCE 229 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


PARPSEAE GPa Rite 


PURSE LES 


mo 
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ERROR MESSAGES 
8674 053262 
8675 053270 
8676 053300 
8677 053304 


8678 053306 
8679 053314 
8680 053320 
8681 053322 
8682 053330 
8683 053334 


8684 053336 
8685 053344 
8686 053350 
8687 053352 
8688 053360 
8689 053367 
8690 053373 
8691 053374 
8692 053402 
8693 053406 
8694 053410 
8695 053416 
8696 053422 
8697 053424 
8698 053432 
8699 053436 
8700 053440 
8701 053446 
8702 053456 
8703 053462 
8704 053464 
8705 053472 
8706 053476 
8707 053500 
8708 053506 
8709 053512 
8710 053514 
8711 053522 
8712 053526 


ey 053530 
536 


8716 053552 
8717 053554 


053270 
104 


116 
377 


053270 
116 
377 

053270 
116 
377 

053270 
101 
377 


053536 


052767 
040 
105 


050066 
105 


050045 
105 
047752 
102 
052767 
040 
102 


050066 
102 


050045 
102 


047752 
105 


052767 
040 
105 


050066 
105 


050045 
105 


047752 
105 
052767 
040 
105 


050066 


MACRO M1113 09-APR-81 


000000 - WORD 
100 €M113B: .ASCIZ 
107 €M114: .ASCIZ 

-BYTE 
-EVEN 

000000 - WORD 

107 €M115: .ASCIZ 
-BYTE 
- EVEN 

000000 - WORD 

1 EM116: .ASCIZ 
-BYTE 
- EVEN 

000000 - WORD 

123. —M117: .ASCIZ 
-BYTE 
-EVEN 

000000 - WORD 
116 EM117B: .ASCIZ 
123. EM120: .ASCIZ 

-EVEN 

0 WORD 
123 EM121: .ASCIZ 
-BYTE 

- EVEN 

000000 - WORD 
123 EM122: .ASCIZ 

-BYTE 
- EVEN 

000000 D 

107 EM123: .ASCIZ 
-BYTE 
- WORD 

100 £&M1238: .ASCIZ 

107 EM124: .ASCIZ 
-BYTE 
- EVEN 

000000 - WORD 

107 EM125: .ASCIZ 
-BYTE 
- EVEN 
- WORD 

107 EM126: .ASCIZ 
-BYTE 
- EVEN 

000000 - WORD 
107 €M127: .ASCIZ 

-BYTE 
- EVEN 

000000 - WORD 
116 EM127B: .ASCIZ 
107 EM130: .ASCIZ 

-BYTE 
-EVEN 
000000 D 


J 2 
13:53 PAGE 99-6 


: FLAGS 
EM113B,EM4B,0 
iNEG! 

377 : FLAGS 
EM1138,EM2B,0 
377, ss FLAGS 


EM117B .EM76B, 0 
7m N(R) i 


33 FLAGS 
EM117B,EM4D,0 
‘ABS: 

377 37 FLAGS 
—M117B,EM4B,0 
‘ABS: 

377 FLAGS 
EM117B,EM2B,0 
tNEG: 

377 3; FLAGS 


ig 75 7 a 0 
# ep 


seo ; FLAGS 
EM123B,EM4D,0 
tNEG: 

377 FLAGS 
EM123B,EM4B,0 
tNEG: 

377 : FLAGS 
wiem. EM2B ,0 
305 FLAGS 


TD NRA 0 


‘NEG: 
377 :FLAGS 
EM127B,EM4D 0 


Be 


"ERTYPE' 


"ERTYPE' 


"ERTYPE' 


"ERTYPE’ 


"ERTYPE* 


"ERTYPE’ 


"ERTYPE' 


"ERTYPE" 


*ERTYPE* 


"ERTYPE" 


"ERTYPE’ 


"ERTYPE' 


*ERTYPE' 


TO 


TO 


TO 


TO 


TO 


TO 


TO 


TO 


TO 


TO 


TO 


TO 


TO 


PRINT 


PRINT 


PRINT 


PRINT 


PRINT 


PRINT 


PRINT 


PRINT 


PRINT 


PRINT 


PRINT 


PRINT 


PRINT 


ADDT'L 


ADDT'L 


ADDT'L 


ADDT’*L 


ADDT‘L 


ADDT'L 


ADDT*L 


ADDT'L 


ADDT'L 


ADDT'L 


ADDT'L 


ADDT'L 


ADDT'L 


ASCIZ 


ASCIZ 


ASCIZ 


ASCIZ 


ASCiZ 


ASC1Z 


ASC1Z 


ASCIZ 


ASCIZ 


ASCIZ 


ASCIZ 


ASCIZ 


ASCIZ 


MSGS, 


MSGS, 


MSGS, 


MSGS, 


MSGS, 


MSGS, 


MSGS, 


MSGS, 


MSGS, 


MSGS, 


MSGS, 


MSGS, 


MSGS, 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


SEQUENCE 230 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


DOWN 


$4. 


E 


: 


: 


[Peat ene | 


E 


‘eet 


moa 
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ERROR MESSAGES 


8718 053562 
8719 053566 


8720 053570 
8721 053576 
8722 053602 


8723 053604 
8724 053612 
8725 053625 
8726 053627 


8727 053630 
8728 053636 
8729 053642 


8730 053644 
8731 053652 
8732 053715 


8733 053716 
8734 053722 
8735 053731 


8736 053732 
8737 053736 
8738 053745 


8739 053746 
8740 053752 
8741 053756 


8742 053760 
8743 053766 
8744 083973 


8745 053774 
8746 054006 
8747 054024 
8748 054030 


8749 054032 
8750 054040 
8751 054044 


8752 054046 
8753 054054 
8754 054060 
8755 054062 


8756 054072 
8757 054076 


8758 054100 
8759 054106 
8760 054112 


116 
377 


053536 


105 
047752 
102 
052767 
040 
102 


050066 
102 


047752 
105 


000000 
105 


000000 
105 


105 


050066 
105 


050045 
123 
105 


047752 
105 


050066 
105 


050045 
105 


047752 
105 


MACRO M1113 09-APR-81 


107 


000000 
123 


000000 
100 
123 


000000 
123 


000000 
107 


107 


—M1351: 


EM132: 


EM132B: . 


EM133: 


EM134: 


EM135: 


EM136: 


EM137: 


EM140: 


EM141: 


EM141C: . 


EM142: 


EM143: 


EM144: 


EM145: 


EM146: 


-ASC1Z 
- EVEN 
- WORD 
-ASCIZ 
-BYTE 
EVEN 
WOR 


59-5 
13:53 PAGE 99- 


iNEG: 

377 sFLAGS ‘ERTYPE* TO 
EM127B,EM2B,0 

1ABS; 

377 FLAGS “ERTYPE’ TO 
EM132B,EM768,0 

1D @N(R7) i 

ABS: 

377 FLAGS *ERTYPE' TO 
EM132B,EM4D ,0 

‘ABS: 

377 FLAGS "ERTYPE’ TO 
EM132B,EM2B ,0 

iNEGD A FAILED.:<CRLF>:XOR 
377 FLAGS "ERTYPE’ TO 
EM4D, 

tNEGD Ai 

377 FLAGS "ERTYPE’ TO 
EM4D ,0 

iNEGD A: 

377 FLAGS "ERTYPE* TO 
EM2B 0 

iNEG: 

377 FLAGS "ERTYPE* TO 
eer -EM4D,,0 

377 FLAGS "ERTYPE* TO 


EM668 ,EM4B ,EM141C,EM4D 0 
& SPECIAL bEST! 


5°’ FLAGS “ERTYPE* TO 
EM66B,EM2B,0 

INEG! 

377 FLAGS "ERTYPE’ TO 
EM76A,EM4D ,0 

'NEG! 

377, ss FLAGS "ERTYPE* TO 
EM76A,EM4B,EM141C,0 

377 ss FLAGS “ERTYPE’ TO 
EM76A, EM2B.0 

377, sos FLAGS “ERTYPE' TO 


PRINT ADDT'L ASCIZ 


PRINT ADDT*L ASCIZ 


PRINT ADDT'L ASCIZ 


PRINT ADDT'L ASCIZ 


SIGN 


PRINT ADDT! L ASCIZ 


PRINT 


PRINT 


PRINT 


PRINT 


PRINT 


PRINT 


PRINT 


PRINT 


PRINT 


BIT S$ 


ADDT'L 


ADDT'L 


ADDT'L 


ADDT'L 


ADDT*L 


ADDT*L 


ADDT'L 


ADDT*L 


ADDT*L 


MSGS, 


MSGS, 


MSGS, 
MSGS, 
T 336: 

MSGS, 
ASCIZ MSGS, 
ASCIZ MSGS, 
ASCIZ MSGS, 


ASCIZ MSGS, 


ASCIZ 


MSGS, 


ASCIZ MSGS, 


ASCIZ MSGS, 


ASCIZ MSGS, 


ASCIZ MSGS, 


SEQUENCE 231 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


DOWN 


DOWN 


DOWN 


E 


E 


DOWN 


$4. 


E 


Pa Eg he 


_¢ 
ax te FP11F FLTG PNT PRT C MACRO M1113 O9-APR-81 13:53 PAGE 99-8 SEQUENCE 232 
ERROR MESSAGES 


8761 054114 053076 050066 000000 . WORD Em102B, EM4D.0 

8762 054122 116 105 107 EM147: <%ASCIZ {NEG 

8763 054126 377 HL 377 sFLAGS ‘ERTYPE' TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
8764 054130 053076 050045 054006 "WORD &M102B,EM4B,EM141C,EM4D,0 

8765 054142 116 105 107 €M150: <ASCIZ iNEG! 

8766 054146 377 -BYTE 377 :FLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
8767 054150 053076 047752 000000 “WORD €M102B,EM2B,0 

8768 054156 116 105 107 €M151:  .ASCIZ iNEG! 

8769 054162 377 -BYTE 377 :FLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
8770 054164 053164 050066 000000 "WORD &M1068,EM4D,0 

8771 054172 116 105 107 €M152: <:ASCIZ {NEG! 

8772 054176 377 y ALS 377 sFLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
8773 054200 053164 050045 054006 “WORD E1068, EM4B,EM141C,EM4D,0 

8774 054212 116 105 107 €M153: .ASCIZ 

8775 054216 377 gL 2 sFLAGS "ERTYPE' TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
8776 054220 053164 047752 000000 “WORD EM1068, EM2B 0 

8777 054226 116 105 107 —M154: “ASCIZ NEG! 

8778 054232 377 y As 377 sFLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
8779 054234 053270 050066 000000 "WORD £M113B,EM4D,0 

8780 054242 116 105 107 €M155:  “ASCIZ ‘NEG! 

8781 054246 377 -BYTE 377 :FLAGS ‘ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
8782 054250 053270 050045 054006 “WORD €M113B,EM4B,EM141C,EM4D,0 

8783 054262 116 105 107 €M156: .ASCIZ NEG! 

8784 054266 377 y oA 377 zFLAGS ‘ERTYPE® TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
8785 054270 053270 047752 000000 "WORD €M113B,EM2B,0 

8786 054276 116 105 107 EM157: “ASCIZ {NEG} 

8787 054302 377 -BYTE 377 :FLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
8788 054304 054312 050066 000000 "WORD &M157B,EM4D,0 

8789 054312 106 040 050 €M157B: .ASCIZ !F (R)+! 

8790 054321 116 105 107 EM160:  “ASCIZ NEG! 

8791 054325 377 -BYTE 377 :FLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
8792 054326 054312 050045 054342 “WORD ENI57B, ENB E1608. EMI4IC, EM4D.0 

8793 054242 056 040 102 €M160B: .ASCIZ |. ONSTANT USED 

8794 054367 116 105 107 £M161:_ .ASCIZ Nee 

8795 054373 377 yA 377 sFLAGS ‘ERTYPE' TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
8796 054374 054312 047752 000000 "WORD €M157B,EM2B,0 

8797 054402 116 105 107 €M162: ASCIZ iNEG! 

8798 054406 377 -BYTE 377 :FLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
8799 054410 054416 050066 000000 "WORD &M162B,EM4D,0 

8800 054416 104 040 050 £M162B: .ASCIZ {D (R75+! 

8801 054426 116 105 107 M163: .ASCIZ !NEG! 

8802 054432 377 “BYTE 377 :FLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 


-EVEN 
8803 054434 054416 047752 000000 -WORD EM 
8804 054442 120 103 040 EM164: .ASCIZ iP 


ma 


CKFPCCO FP11F FLTG PNT PRT C 


ERROR MESSAGES 
8805 054463 
8806 054464 
8807 054472 
8808 054476 

054500 
8810 054506 
8811 054512 
8812 054514 
8813 054522 
8814 054526 
8815 054530 
8816 054536 
8817 054542 
8818 054544 
8819 054552 
8820 054556 
8821 054560 
8822 054566 
8823 054572 
8824 054574 
8825 054602 
8826 05406 
8827 054610 
8828 054616 
8829 054622 
8830 054624 
8831 054632 
8832 054636 
8833 054640 
8834 054646 
8835 054652 
8836 054654 
8837 054662 
8838 054670 
8839 054724 
8840 054730 
8841 054732 
8842 054742 
8843 054777 
8844 055003 
8845 055004 
8846 055010 

055012 


377 
054416 
116 
377 
052534 
101 
377 
052534 
124 
377 
052534 
116 


050167 


054342 
105 


051544 


MACRO M1113 09-APR-81 


000000 
107 


000000 
123 


000000 
124 


00000 
107 


054742 
117 
107 


050176 


—EM165: 


EM166: 


—EM167: 


—M170: 


EM171: 


EM172: 


—M173: 


EM174: 


—EM175: 


EM176: 


EM176B: . 


—EM177: 
EM200: 


EM200C: : 


EM201: 


-BYTE 
- EVEN 
D 


- WOR 
eASCIZ 
-BYTE 
~ EVEN 


99-5 
13:53 PAGE 99- 


377 FLAGS 


EM1 628 ,£M1608..0 


377s: FLAGS 
EM66B.EM4D ,0 
377, ss FLAGS 
EMGGE. EAD 0 
377 : FLAGS 
EM66B,EM4D,0 
INEG! 

377 : FLAGS 
EM668,EM2B 0 
377, FLAGS 
ENGR. EMZB 0 
377 : FLAGS 
EMCEE, EM2B..0 
377, ss FLAGS 
EM668.EM3B.0 
TABS! 

377 S FLAGS 
ENGGB .EMSB..0 
377 ss FLAGS 
EM66B.EM3B ,0 
'NEG! 

377 S FLAGS 


EM1768 ,EM2B 0 
F AC7! 


"ERTYPE' 


"ERTYPE' 


"ERTYPE' 


"ERTYPE' 


"ERTYPE’ 


"ERTYPE* 


*ERTYPE’ 


"ERTYPE* 


*ERTYPE' 


*ERTYPE' 


"ERTYPE* 


TO PRINT 


TO PRINT 


TO PRINT 


TO PRINT 


TO PRINT 


TO PRINT 


TO PRINT 


TO PRINT 


TO PRINT 


TO PRINT 


TO PRINT 


ipOwER MONITOR BIT FOUND SET! 
‘ERTYPE' TO PRINT ADDT'L 


377 FLAGS 
EM66B .EM4 


ADDT'L 


ADDT'L 


ADDT'L 


ADDT'L 


ADDT*L 


ADDT'L 


ADDT'L 


ADDT'L 


ADDT'L 


ADDT'L 


ADDT'L 


D.EM200C .0 
<CRLF>! XOR SIGN BIT FAILED ST 336.! 


a 


mye. 


zFLAGS ‘ERTYPE* TO PRINT ADDT°L 


ASCIZ MSGS, 


ASCIZ MSGS, 
ASCIZ MSGS, 
ASCIZ MSGS, 
ASCIZ MSGS, 
ASCiZ MSGS, 
ASCIZ MSGS, 
ASCIZ MSGS, 
ASCIZ MSGS, 
ASCIZ MSGS, 


ASCIZ MSGS, 


ASCIZ MSGS, 


ASCIZ MSGS, 


SEQUENCE 235 


ADDRESSES 


ADDRESSES 


ADDRESSES 


ADDRESSES 


ADDRESSES 


ADDRESSES 


ADDRESSES 


ADDRESSES 


ADDRESSES 


ADDRESSES 


ADDRESSES 


ADDRESSES 


ADDRESSES 


CRBUT, JENBT ,PRST.N3.N3,N6,WENTTO,NO,NS.N3, INSTOF .N4,N5,N3,0 


2 LINES 


2 LINES 


2 LINES 


2 LINES 


2 LINES 


2 LINES 


2 LINES 


2 LINES 


2 LINES 


2 LINES 


2 LINES 


2 LINES 


2 LINES 


M2B 
zFLAGS ‘ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


PeeR cares fo ba ke koe 


E 


EE 





een | 


N 2 
CKFPCCO FP11F FLTG PNT PRT C MACRO M1113. 09-APR=-81 13:53 PAGE 99-10 SEQUENCE 234 
ERROR MESSAGES 
8847 055050 116 105 107 EM202: .ASCIZ {NEG! 
8848 055054 377 “BYTE 377 ZFLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
8849 055056 052534 047752 “WORD ENGOB, M2B 
8850 055062 377 “BYTE 77 SFLAGS ‘ERTYPE* TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
055064 050167 051544 050176 “WORD CRBUT, JENBT,PRST,N3,N3,N6,WENTTO,N4,N5,N3, INSTOF ,NO,NS,N3,0 
8851 055122 101 102 123 —M203: .ASCIZ {ABS! 
8852 055126 377 “BYTE 377 :FLAGS "ERTYPE* TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
8853 055130 052534 050066 “WORD &M66B,E 
8854 055134 377 -BYTE 377 MO LAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
055136 050167 055237 050176 "WORD CRBUT,10P1B,PRST.NO.N5S.N5,WENTTO,N3,N3,N6, INSTOF ,N3,N3,N5,OR 
8855 055174 050167 051544 050176 -WORD_ CRBUT; JENBT .PRST, *N3.N3.N5.WENTTO,NG.N5.N2.INSTOF .NO.N5.N2.0 
8856 055232 054 040 117 ASCIZ |, OR 


OR: - IZ 
8857 055237 117 120 061 IOP1B: .ASCIZ iOP1B 
8858 055244 101 102 123 EM204: .ASCIZ ABS: 


8859 055250 377 “BYTE 377 sFLAGS "ERTYPE* TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 

8860 055252 052534 050066 055262 “WORD £M66B,EM4D,EM204C.0 
1 055262 200 130 117 EM204C: .ASCIZ <CRLE>! XOR SIGN BIT FAILED ST 452.! 

Bee? 055317 124 123 124 €M205: .ASCIZ !TST! 

8863 055323 377 y At 333 sFLAGS ‘ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 

8864 055324 052534 050066 “WORD &M66B,EM4 

8865 055330 377 -BYTE 377 FLAGS "ERTYPE' TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
055332 050167 055237 050176 WORD CRBUT, 10P1B,PRST.NO.NS NS ,WENTTO.N3,N3,N6, INSTOF ,N3,N3_N4,0 

8866 055370 124 123 124 M206: :ASCIZ TST! 

8867 055374 377 -BYTE 377 sFLAGS "ERTYPE* TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 

8868 055376 052534 047752 “WORD &M668,EM2B 

8869 055402 377 -BYTE 377 SFLAGS “ERTYPE* TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 

050167 051544 050176 “WORD CRBUT, JENBT,PRST,N3,N3,N6,WENTTO,N4,N5,N3, INSTOF ,NO,NS,N3,0 

8870 055442 124 123 124 M207: ‘ASCIZ iTST! 

8871 055446 377 -BYTE 377 :FLAGS "ERTYPE* TO PRINT ADDT*L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 

8872 055450 052534 050066 "WORD &M66B,EM4D 

8873 055454 377 -BYTE 77 ;FLAGS "ERTYPE* TO PRINT ADDT°L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
(055456 050167 055237 050176 "WORD CRBUT,1OP1B,PRST.NO.NS.N7,WENTTO,N3,N3,N5, INSTOF .N3,N3,N4,0 

8874 055514 124 123 124 €M210: “ASCIZ iTST! 

8875 055520 377 “BYTE 37 sFLAGS "ERTYPE’ TO PRINT ADDT*L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 

8876 055522 052534 050066 WORD MG6B.E 

8877 055526 377 -BYTE MO LAGS *ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN | 
055530 050167 051544 050176 “WORD CRBUT, JENBT,PRST,N3,N3,N4,WENTTO,NO,NS,N3, INSTOF .N4,NS,.N3,0 

8878 055 106 123126 eMANT: CASCIZ EIST! | 

8879 05557 377 -BYTE 37 SFLAGS “ERTYPE* TO PRINT ADDT*L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 

8880 055574 052534 050066 050167 "WORD £M66B.EM4D, CRBUT, JOP1B,PRST.N2.NS.NS,WENTTO.N31 32, INSTOF .N3.N1.M0.0 | 

8881 0556 063 061 061 N3132: <ASCIZ '311 OR 312: 


05564 124 123 124 EM212: “ASCI2 is 
8883 055651 377 "BYTE 37 FLAGS "ERTYPE* TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN | 





me 





8 3 
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ERROR MESSAGES 


.EVEN 

8884 055652 052534 047752 “WORD &M66B,EM2B 

8885 055656 377 “BYTE 377 sFLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
055660 050167 051544 050176 “WORD CRBUT, IENBT,PRST,N3,N1,NO,WENTTO,N4,NO,N2, INSTOF ,NO,NO,N2,0 

8886 055716 124 123 124 M213: lASCIZ iTST! 

8887 055722 377 -BYTE 377 :FLAGS ‘ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 

8888 055724 052534 047752 055774 “WORD &M668,EM2B,EM213C,EM213D 

8889 055734 377 -BYTE 377 sFLAGS “ERTYPE* TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
055736 050167 056022 050176 “WORD CRBUT, IF IUV,PRST,N2,N5,N7,WENTTO,N3,N5,N5, INSTCS ,N2,N5,N5,0 

8890 055774 040 106 111 EM213C: .ASCIZ | FIuV=0! 

8891 056004 054 040 117 EM213D: .ASCIZ |}, OPERAND=-0.! 

8892 056022 106 111 125 IFlUv: .ASCIZ !FIUV! 

8893 056027 124 123 124 M214: .ASCIZ TST! 

8894 056033 377 “BYTE 377 sFLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 

8895 056034 052534 047752 056104 “wORD &M668,EM2B,EM214B,EM213D 

8896 056044 377 -BYTE 377 sFLAGS "ERTYPE* TO PRINT ADDT’L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
056046 050167 056022 050176 “WORD CRBUT, IF IUV,PRST.N2,N5,N7,WENTTO,N2,N5,N5, INSTOF .N3,N5,N5,0 

8897 056104 040 106 111 €M214B: .ASCIZ | FlUV=1! 

8903 056114 120 000 EM215: .ASCIZ !P} 

8904 056116 377 -BYTE 377 :FLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 

8905 056120 056163 056151 056200 “WORD PCBAD,NEGDNR,BADCON,N746T2,BUTIN,EM141C,EM4D,0 

8906 056140 067 064 066 N746T2: .ASCIZ 1746 746.! 

8907 056151 116 105 107 NEGDNR: .ASCIZ '!NEGD N(R)! 

8908 056163 103 040 102 PCBAD: .ASCIZ 


C BAD AFTER : 
- BAD CONSTANT USED ; 


056200 056 040 102 "ASCIZ } 
8910 056225 056 000 PERIOD: .ASCIZ !.} 
8911 056227 200 Z 122 BUTIN: ASCIZ <CRLF>!OR (BUT FDST) iN! 


L 
107 £EM216: .ASCIZ NEG! 


8913 056255 377 y ALS 377 sFLAGS ‘ERTYPE® TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
8914 056256 053360 050066 000000 "WORD £M117B,EM4D.0 

8915 056264 116 105 107 EM217: .ASCIZ NEG! 

8916 056270 377 yg Aid 377 zFLAGS “ERTYPE* TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
8917 056272 053360 050045 054006 “WORD £&M117B,EM4B,£M141C,EM4D,0 

8918 056304 116 105 107 EM220: .ASCIZ NEG! 

8919 056210 377 -BYTE 377 :FLAGS "ERTYPE' TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
8920 056312 053360 047752 000000 "WORD £M117B,EM2B,0 

8921 056320 120 000 EM221: .ASCIZ {P! 

8922 056322 377 -BYTE 377 :FLAGS ‘ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
8923 056324 056163 056355 056200 "WORD PCBAD, NEGDAR,BADCON,N747T2,BUT IN, EM141C,EM4D,0 

8924 056344 067 064 067 N747T2: .ASCIZ 1747 747.! 

8925 056355 116 105 107 NEGDAR: .ASCIZ !NEGD @N(R)! 

8926 056370 116 105 107 EM222: :ASCIZ NEG! 

8927 056374 377 -BYTE 377 sFLAGS "ERTYPE' TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
8928 056376 053446 050066 000000 “WORD £M123B,EM4D,0 

8929 056404 116 105 107 EM223: <ASCIZ NEG: 

8930 056410 377 “BYTE 377 sFLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 


RI Fe ee Ete: SOREN. AEA IE ACL Dela Bohs 


CKFPCCO FPIIF FLTG PNT PRT C 
ERROR MESSAGES 


8931 056412 
8932 056424 
8933 0564350 
8934 056432 
8935 056440 
8936 056442 
8937 056444 
8938 056452 
8939 056463 
8940 056465 
8941 056466 
8942 056474 
8943 056476 
8944 056500 


8946 5 
8947 056527 
8948 056530 
8949 056536 
8950 056550 
8951 056552 
8952 056554 
8953 056562 
8954 056564 
8955 056566 
8956 056574 
8957 056576 
8958 056600 
8959 056606 
8960 056620 
8961 056622 
8962 056624 
8963 056632 
8964 056634 
8965 056636 
8966 056644 
8967 056646 


8971 056673 


8972 056674 
8973 056702 
8974 056704 


953446 
116 
377 


050045 
105 


MACRO M1113 09-APR-81 


054006 
107 


000000 
122 


000000 
120 


000000 
120 


000000 
120 


EM224: 


EM225: 


EM225B: . 
EM226: 


EM227: 


EM227B: . 


EM230: 


FM230B: 


EM231: 


EM232: 


EM233: 


EM233B: . 


EM234: 


EM235: 


EM236: 


EM236B: . 


EM237: 


EM240: 


-EVEN 
«WORD 
fata 





ee 
13:53 PAGE 99-12 


EM1238,EM4B,EM141C,EM4D,0 
7° FLAGS “ERTYPE* TO 
EM1238,EM2B,0 

377 FLAGS "ERTYPE* TO 
EM225B,EM4B,0 

iDFPS (R)i 

357 FLAGS "ERTYPE’ TO 
EM225B,EM2B 0 

397 FLAGS ‘ERTYPE’ TO 
EM225B,£M227B,0 

| TRAPPED TO 4. ! 


ili ; 
377 FLAGS ‘ERTYPE* TO 


EM230B,EM4B ,0 
‘DFPS (R)+: 


377 SFLAGS "ERTYPE* TO 
EM2308,EM2B,0 

377s FLAGS "ERTYPE* TO 
EM230B ,.EM227B..0 

377: FLAGS “ERTYPE* TO 


EM233B8 ,EM4B ,0 
iDFPS =(R): 


377s FLAGS “ERTYPE" TO 
EM233B,EM2B.0 

377s FLAGS "ERTYPE* TO 
EM233B ,EM227B.0 

377. so: FLAGS "ERTYPE* TO 


EM236B ,EM4B,,0 
iDFPS @(R)+; 


tL 
377 FLAGS "ERTYPE' TO 
EM2368.,EM2B,0 

377 FLAGS "ERTYPE' TO 


PRINT 


PRINT 


PRINT 


PRINT 


PRINT 


PRINT 


PRINT 


PRINT 


PRINT 


PRINT 


PRINT 


PRINT 


PRINT 


ADDT'L 


ADDT*L 


ADDT'L 


ADDT*L 


ADDT'L 


ADDT*L 


ADDT'L 


ADDT'L 


ADDT*L 


ADDT'L 


ADDT'L 


ADDT'L 


ADDT*L 


ASCIZ 


ASCIZ 


ASC1Z 


ASC1Z 


ASCIZ 


ASC1Z 


ASCIZ 


ASCIZ 


ASCIZ 


ASCIZ 


ASCIZ 


ASCIZ 


ASCIZ 


MSGS, 


MSGS, 


MSGS, 


MSGS, 


MSGS, 


MSGS, 


MSGS, 


MSGS, 


MSGS, 


MSGS, 


MSGS, 


MSGS, 


MSGS, 


SEQUENCE 236 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


: 


: 


: 


E 


E 


: 


: 


: 


E 


: 


: 


17 


CKFPCCO FP11F FLTG PNT PRT C 
ERROR MESSAGES 


8975 056706 
8976 056714 
8977 056716 


8978 056720 
8979 056726 
8980 056741 
8981 056743 
8982 056744 
8983 056752 
8984 056754 
8985 056756 
8986 056764 
8987 056766 


8988 056770 


8991 057012 


8992 057014 
8993 057022 
8994 057040 


8999 057075 


9000 057076 
9001 057104 
9002 057106 


9003 057110 
9004 057116 
9005 057131 
9006 057133 


9007 057134 
9009 057142 
9010 057156 
9011 057160 
9012 057162 
901 

9014 057170 
9015 057206 
9016 057224 


057226 
057232 
0£ 7234 


056656 
114 
377 

056726 
104 


114 
377 


056726 
114 
377 

056726 
114 
377 

056776 
104 


114 
377 


056776 
120 
376 


056776 
114 
377 

057116 
104 


114 
377 


057116 
Os70es 


057022 


056506 


s 


050045 
106 


8 


047752 
000 
056506 
000 


050045 
106 


MACRO M1113 09-APR-81 


-EVEN 
- WORD 
-ASCIZ 
-BYTE 
-EVEN 


EM241B: . 
EM242: 


000000 
EM241: 


000000 
120 


EM243: 
EM244: 


EM244B: . 
EM245: 


000000 
120 


040 FM246: 

000254 
057170 WORD 
106 EM246B: 
EM247: 


EM250: 


EM250B: . 
EM251:  .ASCIZ 


0 
120 
D 

Sati EM246 
M252B: .ASCIZ 
MOSS -ASCIZ 
-BYTE 
-EVEN 
. WORD 
EM254=EM246 

EM254B: 

EM255: 


EM256: .ASCIZ 
BY 





dD 3 
13:53 PAGE 99-13 


EM2368,£M227B 0 
377 sFLAGS "ERTYPE' 


EM241B,EM4B ,0 
iDFPS a=(R): 


377 FLAGS "ERTYPE® 
EM241B,EM2B,0 

377 FLAGS “ERTYPE® 
EM241B,EM227B,0 

377s FLAGS "ERTYPE® 


EM244B,,EM4B,0 
‘DFPS N(R): 


tLe 

377 sFLAGS "ERTYPE* 
EM244B, EM2B 0 

'PC BAD AFTER ! 

FLAGS "ERTYPE' 
246,252,254,0 
EM246B,EM252B,EM254B 
iLDFPS “NCRD 

377 SFLAGS "ERTYPE* 
M2448, EM227B.0 

359 :FLAGS "ERTYPE* 


EM250B,EM4B 0 
+h N(R) ! 


377: FLAGS "ERTYPE® 
EM250B ,EM2B ,0 

‘LDFPS @N(R) | 

377: FLAGS “ERTYPE® 
EM250B ,EM227B,0 

‘LDCLD (R7)+.A! 

ae am ge "ERTYPE" 
£M227B.0 


ibs 
377 sFLAGS ‘ERTYPE' 


TO 


TO 


TO 


TO 


TO 


TO 


TO 


TO 


TO 


TO 


TO 


TO 


PRINT 


PRINT 


PRINT 


PRINT 


PRINT 


PRINT 


PRINT 


PRINT 


PRINT 


PRINT 


PRINT 


PRINT 


ADDT*L ASCIZ MSGS, 


ADDT'L ASCIZ MSGS, 


ADDT'L ASCIZ MSGS, 


ADDT'L ASCIZ MSGS, 


ADDT'L ASCIZ MSGS, 


ERR # SPECIFIC ASCIZ MSGS, ADRS 3 LINES DOW 


ADDT'L ASCIZ MSGS, 


ADDT'L ASCIZ MSGS, 


ADDT'L ASCIZ MSGS, 


ADDT'L ASCIZ MSGS, 


ADDT*L ASCIZ MSGS, 


ADDT*L ASCIZ MSGS, 


SEQUENCE 237 


ADDRESSES 2 LINES DOWN 


ADDRESSES 2 LINES DOWN 


ADDRESSES 2 LINES DOWN 


ADDRESSES 2 LINES DOWN 


ADDRESSES 2 LINES DOWN 


ADDRESSES 2 LINES DOWN 


ADDRESSES 2 LINES DOWN 


ADDRESSES 2 LINES DOWN 


ADDRESSES 2 LINES DOWN 


ADDRESSES 2 LINES DOWN 


ADDRESSES 2 LINES DOWN 





9020 057236 
9021 057244 
9022 057260 
9023 057262 


9024 057264 
9025 057272 
9026 057274 


9027 057276 
9028 057304 


9029 057330 
9030 057332 
9031 057334 


9032 057342 
9033 057344 


9034 057346 
9035 057352 


057354 
9036 057412 
9037 057415 
9038 057430 
9039 057432 


9040 057434 
9041 057442 
9042 057455 
9043 057457 


9044 057460 


9047 057544 


9048 057546 
9049 057556 
9050 057613 
9051 057615 


9052 057616 
9053 057622 


057624 
9054 057662 
9055 057667 
9056 057671 


9057 057672 
9058 057702 
9059 057754 
9060 057756 


9061 057760 


057244 
104 
114 
377 

057244 
114 
377 


057415 
377 


ang 


057442 
104 
114 
377 


057415 
200 


057304 
377 


050167 
130 
114 

057442 
200 
114 
377 

057442 


CKFPCCO FP11F FLTG PNT PRT C 
ERROR MESSAGES 


050045 
103 
000 


047752 
000 


050066 
103 
000 


047752 
000 


050066 


watt > 


050066 


MACRO M1113 09-APR-81 


1000 
114 


000000 


00 
111 


057556 
105 


050176 
102 
057702 
123 


057770 


EM256B: . 
EM257: 


EM260: 


EM260B: 
EM261: 


EM262: 


IFL: 
FM262B: 


EM263: 


EM263B: . 


EM264: 


EM264C: 


EM265: 


EM265C: 
EM266: 


IXNBT: 
EM267: 


EM267C: . 
EM270: 


3 
13:53 PAGE 59-14 SEQUENCE 238 


EM256B ,EM4B,0 
‘DCLD (R)+,A: 


iL} 
377 ——«; FLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 
EM256B.EM2B.0 

377 FLAGS "ERTYPE' TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


EM260B ,EM4D ,0 
md OR mUDeLF (R),Ai 


377 —«; FLAGS 'ERTYPE' TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 
EM2608,EM2B,.0 
377: FLAGS ‘ERTYPE' TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


yes -£ 
377 nELAGS "ERTYPE’ TO PRINT ADDT'L ASCiZ MSGS, ADDRESSES 2 LINES 


te - IFL,PRST.N2.N7,N7,WENTTO,N3S,.NO,NO, INSTOF .N3,NO,N1,0 
‘te (R) Ai 
377 FLAGS ‘ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


i DCLF (R),A: 


tli 
377 3FLAGS ‘ERTYPE* TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


EM262B ,EM4D ,EM264C ,0 
<CRLF>!USED CONSTANT 237 INSTEAD OF 217 ST 107.: 


iLi 
377 zFLAGS ‘ERTYPE' TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 
EM260B ,EM4D ,EM265C ,0 


tae ‘SET SIGN BIT FAILED ST 146.! 

377 sFLAGS ‘ERTYPE' TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 
EM260B ,EM4D 

377 OF LAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


vost Schelpe ft meek a 


iL 
377 sFLAGS "ERTYPE' TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


EM263B ,EM4D ,EM267C ,0 
<CRLF >: USED CONSTANT 217 INSTEAD OF 237 ST 107.: 


1 
377 FLAGS ‘ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 
EM2638 ,EM4D ,EM270C 0 


: 


E 


E 





9062 057770 
9063 060006 
9064 060010 


9070 060060 
9071 060115 
9072 060117 
9073 060120 


9076 060154 
9077 or tks 


9080 060170 
9081 060174 


060176 
9082 060234 
9083 060247 
9084 060251 


9085 060252 


9097 060502 
9098 060510 
9099 060523 
9100 060525 
9101 060526 


9102 060534 
9103 060536 


9104 060540 
9105 060546 


CKFPCCO FP11F FLTG PNT 
ERROR MESSAGES 


PRT C 


122 
000 


050066 
124 
000 


050066 
122 
000 


050066 
103 
000 


047752 
000 


050066 


057412 
103 





MACRO M1113 09-APR=81 


117 
060022 
122 
060060 
061 
0000 
111 


000000 


050176 
111 


060262 
123 


000000 
130 
000000 


000000 


EM270C: 
EM271: 
EM271C: . 
EM272: 
EM272C: . 
EM273: 


EM273B: . 


EM274: 


EM275: 


EM275B: 


EM276: 


EM276C: . 


EM277: 


EM277C: . 
EM300: 


EM300C: . 


EM301 


—M301B: 
EM302: 


EM303: 


-ASCIZ 


. 3 
13:53 PAGE 99-15 


FLAGS ‘ERTYPE* TO PRINT 


638 ,EM4D ,EM271C,0 
UNCATION ERROR. : 


3 FLAGS "ERTYPE' TO PRINT 
EM260B ,.EM4D ,EM272C,0 


3 
é 


se ~ ae 


SEQUENCE 239 


ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


<CRLF>!R14 NOT INCREMENTED ST 630.: 


iL: 
377 sFLAGS “ERTYPE’ TO PRINT 


EM273B,EM4D ,0 
‘DCID OR LDCLD 


iL: 

377 : FLAGS 
EM2738EM2B..0 
377 FLAGS 


EM275B,EM4D 
377 7 FLAGS 


(R),A: 
*ERTYPE’ TO PRINT 


"ERTYPE* TO PRINT 


*ERTYPE® TO PRINT 


ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


ADDT'iL ASCIZ MSGS, ADDRESSES 2 LINES 


ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


CRBUT, IFL,PRST.N2,N7,N7,WENTTO,N3,NO,NO, INSTOF ,N3,NO,N1,0 


IDCID" (RD At 
377 FLAGS "ERTYPE’ TO PRINT 


EM275B ,EM4D ,EM276C ,0 
<CRLF>!USED CONSTANT 237 INSTEAD 


iL 
377 :FLAGS “ERTYPE*® TO PRINT 
EM275B .,.EM4D ,EM277C 


0 
<CRLF>: SET SIGN FAILED ST 146.! 
iLDCLD (R),A 


577 OECAGS "ERTYPE* TO PRINT 
EMGD ,EM300C ,0 

<CRLF>!USED CONSTANT 217 INSTEAD 
37 FLAGS “ERTYPE TO PRINT 
EM301B,EM4D,0 

‘DEXP (R) Ai 

377 FLAGS “ERTYPE* TO PRINT 
EM301B,EM2B,0 

37 FLAGS "ERTYPE’ TO PRINT 


EM301B,EM3B.0 


ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


OF 217 ST 107.: 
ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


OF 237 ST 107.: 
ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


DOWN 


E 


—a 


ar 





CKFPCCO FP11F FLTG PNT 
RROR MESSAGES 


9106 060550 
9107 060552 
9108 060562 
9109 060626 
9110 060630 
9111 060632 
9 060642 
9114 060724 
9115 060726 
9116 060732 

060734 
9117 060772 
9118 061030 
9119 061032 


9120 061034 
9121 061040 


9 
mn 
Wr 

= RK 
—— 


Mn ——| See Se R 
ay 
ORS FB SFSU SR VS 


061236 
9135 061274 
9136 061276 


9137 061300 
9138 061304 
061 
9139 061344 
9140 061346 


9141 061350 


050167 


050167 
114 
377 

060510 
377 


050167 
106 


050167 
114 
377 


060510 
377 


050167 
114 
377 


060510 
377 


050167 
114 
377 

060510 


PRT C 


050066 
105 
000 


047752 
050 
047752 
051240 
051240 
000 
050066 
051240 
000 
047752 
061150 
111 
050066 


061150 
000 


050066 


051240 
000 


050066 


061150 
000 


050066 


MACRO M1113 09-APR-81 

060562 J 
130 EM304C: 

—M305: .ASCIZ 


102 €M30SC: . 
EM306: 


050176 . WORD 
050176 
—EM307: 


050176 
FM310: 


050176 . WORD 
125 : 


050176 
EM312: 


050176 - WORD 
—M313: 


050176 
EM314: 


G 3 
13:53 PAGE 99-16 


377 sFLAGS ‘ERTYPE' TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


EM301B,EM4D ,EM304C ,0 
<CRLF>!EXCESS 200 CALCULATION ST 624 BAD. 


tks 
377 sFLAGS "ERTYPE' TO PRINT ADDT*L ASCIZ MSGS, ADDRESSES 2 LINES 


EM301B,EM2B,EM305C, 
teh (BUT ENBT, Eder, XNBT) ST 625 DID NOT GO TO 304.: 


377 zFLAGS "ERTYPE’ TO PRINT ADDT*L ASCIZ MSGS, ADDRESSES 2 LINES 


o's. EM2B 
377 zFLAGS ‘ERTYPE’ TO PRINT ADDT*L ASCIZ MSGS, ADDRESSES 2 LINES 


CRBUT, IEZBT,.PRST.NS,N4,N4,WENTTO,NS.NO,N4, INSTOF .N7,NO,N4,OR 
CRBUT, IEZBT .PRST ,N7,NO,N4 ,WENTTO,N2.N6,N4, INSTOF .NO,N6.N4,0 


ils 
377 FLAGS “ERTYPE® TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


ye. EM4D 
377 FLAGS “ERTYPE* TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


CRBUT, IEZBT.PRST,N7,NO,N4,WENTTO,NO.N6.N4, INSTOF .N2.N6,N4 ,0 
Li 
377 FLAGS “ERTYPE’ TO PRINT ADDT°L ASCIZ MSGS, ADDRESSES 2 LINES 


ors. EM2B 
377 FLAGS "ERTYPE' TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


AEA TATTLE PE AE SOE IB LTO 
tFIU: 


L: 
377 FLAGS ‘ERTYPE* TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


os. EM4 
377 FLAGS *ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


CRBUT, IF IU,PRST.N2.N6,N4,WENTTO,N1,N5.N5S, INSTOF .N1,.N1,N5.0 
iL: 
377 zFLAGS ‘ERTYPE* TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


EM301B,EM4 
377 FLAGS *ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


CRBUT, IEZBT .PRST.NS.N4.N4,WENTTO,N7,NO.N4, INSTOF .NS,.NO.N4.0 
tL 
377 ZFLAGS ‘ERTYPE’ TO PRINT ADDT*L ASCIZ MSGS, ADDRESSES 2 LINES 


Pp0te. EMG 
377 FLAGS *ERTYPE’ TO PRINT ADDT*L ASCIZ MSGS, ADDRESSES 2 LINES 


CRBUT, IF 1U,PRST,.NS,NO,N4,WENTTO,N1.N5.NS, INSTOF .N1,.N1,N5,0 

tL 

377 FLAGS “ERTYPE® TO PRINT ADDT*L ASCIZ MSGS, ADDRESSES 2 LINES 
EM301B,EM4D 


SEQUENCE 240 


DOWN 


tae 


$i pi 


PRP as ae 


Pe haa) 


CKFPCCO FRIIF FLTG PNT 
ERROR MESSAGES 


9142 961354 377 
050167 
114 


377 


061356 
9143 061414 
9144 061416 


9145 061420 060510 
9146 061424 377 


061426 050167 

9147 061464 114 
9148 061466 377 
060510 


9149 061470 
9150 061474 377 


061476 050167 
9151 061534 114 
9152 061536 377 


9153 061540 060510 
9154 061544 377 


061546 coed | 1 

9155 061604 
9156 061606 377 
9157 061610 060510 
1614 377 


61 
9158 06161 


061616 050167 
9159 061654 114 
9160 061656 377 


9161 061660 060510 
9162 061664 377 


050167 
123 
377 


061666 
9163 061724 
9164 061726 
9165 061730 


9166 061736 124 
9167 061762 123 


9168 061764 377 
9169 061766 061736 
9170 061774 123 
9171 061776 377 
9172 062000 061736 
9173 062006 123 
9174 062010 377 
9175 062012 062022 
9176 062022 124 
9177 062035 200 





PRT C 


052142 
090 


050066 


052142 
000 


050066 


052142 
000 


050066 


052142 
000 


050066 


052142 
000 


050066 


052142 
000 


050066 
103 
000 


047752 
000 
050002 
000 


047752 
103 
103 


MACRO M1113 09-APR-81 


050176 - WORD 
EM315: ae 


050176 
EM316: 


050176 
—M317: 


050176 ~ WORD 
FM320: 


050176 
EM321: 


050176 - WOR 
EM322: .ASCIZ 


104 €M322B: . 
—M323: .ASCIZ 


- WOR 
EM324: meat 


. WOR’ 
EM325: .ASCIZ 


EM3258: . 
14 €EM325C: .ASCIZ 


H 3 
13:53 PAGE 99-17 
377 

Ty 
377 


ve. EM, 
377 FLAGS "ERTYPE* TO PRINT ADDT'L ASCIZ MSGS, 


sFLAGS ‘ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, 


zFLAGS “ERTYPE® TO PRINT ADDT*L ASCIZ MSGS, 


SEQUENCE 241 


ADDRESSES 2 LINES DOWN 
CRBUT,1F1V,PRST,N1,NO,N4,WENTTO,N1.N1 ,N6, INSTOF -N1,N3.N6,0 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


CRBUT , IF IV,PRST.N1,NO,N4,WENTTO,N1,N3.N6, INSTOF .N1.N1,N6,0 


iL: 
377 
Sl EMG 
377 FLAGS "ERTYPE* TO PRINT ADDT‘L ASCIZ MSGS, 


FLAGS “ERTYPE* TO PRINT ADDT'L ASCIZ MSGS, 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


CRBUT , IF 1V,PRST.N1,N6,N6,WENTTO,N1.N1,N6, INSTOF .N1.N3.N6.0 


tLe 
377 
oP. EMG 
377 FLAGS *ERTYPE* TO PRINT ADDT‘L ASCIZ MSGS, 


FLAGS “ERTYPE’ TO PRINT ADDT‘L ASCIZ MSGS, 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


CRBUT , IF IV,PRST.N1,N4,N4,WENTTO,N1.N3,N6, INSTOF .N1.N1,N6,0 


tLe 
377 
os. EMG 
377 FLAGS "ERTYPE’ TO PRINT ADDT‘L ASCIZ MSGS. 


FLAGS “ERTYPE* TO PRINT ADDT*L ASCIZ MSGS, 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


CRBUT , IF IV,PRST.N3,.N4.N4,WENTTO,N1,N1.N6, INSTOF .N1,.N3,N6.0 


Li 
377 
ey. EMG 
377 FLAGS *ERTYPE* TO PRINT ADDT'L ASCIZ MSGS, 


377, Ss: FLAGS "ERTYPE' TO PRINT ADDT'L ASCIZ MSGS. 
EM322B,EM4D.0 

TCD] OR STCDL (R),A! 

33> FLAGS “ERTYPE* TO PRINT ADDT'L ASCIZ MSGS, 
EM322B, EM2B,0 

377s FLAGS “ERTYPE* TO PRINT ADDT'L ASCIZ MSGS. 
EM322B,£M3B.0 

377s: FLAGS "ERTYPE* TO PRINT ADDT'L ASCIZ MSGS. 
EM325B,£M2B,EM325C .0 

iTCDL (R), 


A: 
<CRLF>:! CLEAR FLAG ST 774 FAILED, OR: 


FLAGS “ERTYPE* TO PRINT ADDT*L ASCIZ MSGS, 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


CREUT IF IV.PRST.N3.N4.N4,WENTTO.NT .NS.N6, INSTOF .N1.N1 .N6.0 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


ADDRESSES 2 LINES 


PAMETEET PAE 


$4. 


E 


CKFPCCO FPI11F FLTG PNT PRT C MACRO M1113 O9-APR-81 13:53 PAGE 13, SEQUENCE 242 
ERROR MESSAGES 


9178 062073 377 -BYTE 377 sFLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
062074 050167 052300 050176 "WORD  CRBUT,IFLAG,PRST,N6,.N6,N2,WENTTO,N3,N6,N5, INSTOF ,N3,N6,N1,0 

9179 062006 EM326=EM325 

9180 062132 123 000 EM327: .ASCIZ 3S! 

9181 062134 377 “BYTE 377 SFLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 

9182 062136 062022 050066 WORD M3258, EMG 

9183 062142 377 “BYTE FLAGS ‘ERTYPE' TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
062144 050167 051544 050176 "WORD CRBUT, IEN@T,PRST,N6,N3,N2,WENTTO,N4.N7,N3, INSTOF ,NO,N7,N3,0 

9184 BOS 363 123 000 —M330: .ASCIZ !S: 

9185 062204 377 eo 377 FLAGS ‘ERTYPE’ TO PRINT ADDT'L ASC1IZ MSGS, ADDRESSES 2 LINES DOWN 

9186 062206 062022 047752 “wORD £€M3258,EM2B 

9187 062212 377 y Ls 377 sFLAGS “ERTYPE* TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
062214 050167 062252 050176 "WORD CRBUT.IFIC,PRST,NO,NO,N4,WENTTO,N3,NO.NS, INSTOF .N3,N1.N5,0 

9188 062252 106 111 103 IFIC: ASCIZ !FIC! 

9189 062256 123 000 EM331: .ASCIZ [S 

9190 062260 377 “BYTE 377 :FLAGS "ERTYPE’ TO PRINT ADDT’L ASCiZ MSGS, ADDRESSES 2 LINES DOWN 

9191 062262 062022 047752 “WORD €M325B,EM2B 

9192 062266 377 gL 377 sFLAGS “ERTYPE* TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
062270 050167 062252 050176 "WORD CRBUT , IFIC,PRST.NO.NO,N4,WENTTO,N3.N1.N5, INSTOF .N3,NO, NS,0 

9193 062326 123 000 EM332: .ASCIZ /S: 

9194 062330 377 3S 377 FLAGS ‘ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 

9195 062332 062342 050066 062355 “WORD £€M332B,EM4D,EM332C.0 

9196 062342 124 103 104 €M332B: -ASCIZ iTCDI (R),A! 

9197 062355 200 125 123 EM332C: .ASCIZ <CRLF>!USED CONSTANT 37 INSTEAD OF 17 ST 66.! 

9198 061762 EMSS ScEMa2$ 

9199 062424 123 000 EM334: .ASCIZ }S! 

9200 062426 377 y td 377 sFLAGS “ERTYPE* TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 

9201 062430 062342 047752 062440 “WORD £M332B,EM2B,EM334C,0 

9202 062440 200 125 123 EM334C: .ASCIZ <CRLF>!USED CONSTANT 37 INSTEAD OF 17 ST 66.! 

9203 062507 123 000 —M335: .ASCIZ !S! 

9204 062511 377 eld 377 FLAGS “ERTYPE' TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 

9205 062512 062342 050066 “WORD £M332B,E 

9206 062516 377 “BYTE 377 Wier ‘ERTYPE' TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
062520 050167 051544 050176 “WORD CRBUT, JENBT,PRST.N6,N3,N2,WENTTO,NO.N7,N3,INSTOF .N4, N7,.N3,0 

9207 062556 123 000 EM336: .ASCIZ 

9208 062560 377 “BYTE 377 sFLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 

9209 062562 062342 047752 062574 "WORD €&M332B.EM2B, EM336C « M4D,0 

9210 062574 200 123 105 €M336C: .ASCIZ <CRLF>!SET FN ST 473: 

9211 062613 123 000 —M337: .ASCIZ /S! 

9212 062615 377 “BYTE 377 SFLAGS "ERTYPE' TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 

9213 062616 062022 050066 “WORD m325B,E 

9214 062622 377 “BYTE Mee acs "ERTYPE' TO PRINT ADUT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 


062624 050167 062662 050176 -WORD CRBUT,ICOUT,PRST,N2.N7,N5,WENTTO,NO,N7.N4, INSTOF .N2,N7,N4,0 





on 


9215 062662 
9216 062667 
9217 062671 
9218 062672 
9219 062676 

062700 
9220 062736 
9221 062740 
9222 062742 
9223 062746 

062750 
9224 063006 
9225 063010 
9226 063012 
9227 063016 

063020 
9228 063056 
9229 063060 
9230 063062 
9231 063066 


063070 
9232 063126 
9233 063133 
9234 063135 
9235 063136 
9236 063142 

063144 
9237 063202 
9238 063240 
9239 063242 
9240 063244 
9241 063250 

063252 
9242 063310 
9243 063324 
9244 063326 


9247 063411 
9248 063412 


9251 063435 


CKFPCCO FP11F FLTG PNT 
ERROR MESSAGES 


062022 
377 


050167 
123 
377 

062022 
377 


050167 
123° 


377 
062022 
377 


ant 7! 


062022 
377 
050167 
050167 
123 
377 


062342 
377 


PRT C 


117 
000 


050066 


062662 
000 


047752 


051240 
000 


050066 


062002 
000 


050066 


063126 
102 
000 


050066 
062662 
063126 

000 
050066 
057412 

124 


ans 
132 
000 


050066 
105 
000 


MACRO M1113 09-APR-81 


125 ICOUT: 


EM340: .ASCIZ 


050176 
EM341: 


050176 
EM342: 


50176 
EM343: 


050176 
111 ~=INBIT: 
EM344: 


050176 . WORD 
050176 
EM345: 


050176 ° 
103 EM346: ae 


000000 . 
105 EM346C: 
EM347: 


000000 . 
130 €M347B: 


EM350: .ASCIZ 


J 3 
13:53 PAGE 99-19 


EM4D 
77 sFLAGS 'ERTYPE' TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 
SE nO PO LE A AE AR EA A ee dew Ore 
77 zFLAGS ‘ERTYPE' TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


77 MEP AGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 
CRBUT, IEZBT,PRST,N3,N7,N7,WENTTO,N6,N3,N3, INSTOF .N4,N3,N3,0 
FLAGS 'ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


EM325B,,EM4D 
377 FLAGS ‘ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


CRBUT , 1 COUT .PRST .N3.N6,NO,WENTTO,N6,N5.N4, INSTOF .N4 ,N5 N40 
377 sFLAGS "ERTYPE’ TO PRINT ADDT*L ASCIZ MSGS, ADDRESSES 2 LINES 
wr — FLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 
OY  MBET PORE LALO SE MEO AE SO AE LE SRG AE 


‘Si 

377 
5258. EM4 
377 


FLAGS “ERTYPE* TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


FLAGS *ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


CRBUT , ICOUT ,PR°T,N3.N6,NO,WENTTO,N4,NS,N4, INSTOF .N6,N5.N4,0R 
CRBUT.INBIT, ;N6.N5.N4WENTTO,N4.N3,N1 , INSTOF .NSN3,N1 0 


iS: 
377 zFLAGS ‘ERTYPE' TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


F5p528 6% 
377 FLAGS "ERTYPE' TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


iieiee e oN6,.N3,N3,WENTTO,N6,N5,N5, INSTOF .N6,N5,N4,0 
377 zFLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


EM4D, EM346C 0 
<CRLF>!ZERO LOW ORDER PART OF X11 FAILED ST 773.: 


‘Si 
377 FLAGS ‘ERTYPE* TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


Pe. mt 0 
i * 


377 FLAGS “ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


SEQUENCE 243 


zFLAGS ‘ERTYPE' TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 


PRR Ge Paes 


iba 


E 


COWN 


4 


mmo 


K 3 
13:53 PAGE 99-20 


CKFPCCO aah FLTG PNT PRT C —- MACRO M1113 09-APR=81 SEQUENCE 244 | 
ERROR MESSAGES | 
EVEN | 
9252 063436 063420 047752 000000 D EM347B. EM2B, 0 
9253 063444 115 117 122 M351: .ASCII {MORE THAN ONE WORD | 
9254 063467 127 122 111 eASC1Z WURITTEN © BY STEXP A, in). +<CRLF>: ZERO FDFL ST 347: | 
9255 063540 377 “BYTE 377 :FLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN | 
9256 063542 050066 000000 “WORD &M4D,0 
9257 063546 123 000 EM352: .ASCIZ iS! 
9258 063550 377 g Ld 377 sFLAGS ‘ERTYPE' TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
9259 063552 063420 047752 “WORD &M347B,EM2B 
9260 063556 377 -BYTE 377 :FLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
063560 050167 051544 050176 “WORD CRBUT, IENBT,PRST,N3,N7,N6,WENTTO,NO,N7,N1, INSTOF .N4,N7,N1,0 
9261 063616 123 000 EM353: .ASCIZ {Si 
9262 063620 377 y to 377 sFLAGS ‘ERTYPE' TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
9263 063622 063420 047752 “WORD M3478. M2B 
9264 063626 377 -BYTE 377 :FLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
063630 050167 051240 050176 “WORD  CRBUT,IEZBT,PRST,NO.N7,N1,WENTTO,NO,N7,N2, INSTOF .N2,N7,N2,0 
9265 063666 123 000 EM354: .ASCIZ [S! 
9266 063670 377 gy Ls 377 sFLAGS ‘ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
9267 063672 063420 047752 WORD EM34 7B,EM2B 
9268 063676 377 y i 377 sFLAGS “ERTYPE' TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
063700 050167 051240 050176 "WORD CRBUT,JEZBT,PRST.NO,N7,N1,WENTTO,N2,N7,N2, INSTOF ,NO,N7,N2,0 
9269 063736 123 000 EM355: .ASCIZ [S! 
9270 063740 377 “BYTE 377 :FLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
9271 063742 063420 047752 “WORD &M347B,EM2B 
9272 063746 377 -BYTE 377 sFLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
063750 050167 051544 050176 "WORD CRBUT, JENBT,PRST.N3,N7,N6,WENTTO,N4,N7,N1, INSTOF ,NO,N7,N1,0 
9273 064006 123 124 123 EM356: .ASCIZ {STST (R) GOT BAD FEC./<CRLF> 
9274 064035 377 -BYTE 377 sFLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
9275 064036 064042 000000 “WORD &M356B,0 
9276 064042 101 106 124 EM356B: .ASCIZ {AFTER EXECUTING AN ILLEGAL FPP OP CODE. : 
9277 064112 123 124 123 —M357: | .ASCIZ {STST (R) GOT BAD FEA.!<CRLF> 
9278 064141 377 -BYTE 77 FLAGS 'ERTYPE* TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
9279 064142 064042 000000 “WORD EM356B,.0 
9280 06414 117 116 114 M360: ‘ASCII {ONLY ONE WORD WRITTEN BY STST (R). } 
9281 wake 123 105 124 "ASCIZ iSET FDFL ST 
9282 064231 377 -BYTE 377 SFLAGS "ERTYPE* TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
9283 064232 050066 “WORD 
9284 064236 123 124 123 €M361: .ASCIZ idm (R)} 
9285 064247 377 . VTE 377 sFLAGS "ERTYPE* TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
9286 064250 047752 000000 “WORD EM2B,0 
9287 064254 116 117 116 €M362: ASCII {NON-RESIDENT MEMORY MANAGEMENT TRAP - | 
9288 064322 111 115 120 "ASCIZ i IMPROP OPER D-SPACE ACCESS ATTEMPTED! 
9289 064364 104 111 106 M363: <ASCIZ {DIFFERENCE BETWEEN SR1 AND CAL CULATED: 
9290 064432 106 120 120 £M364: ASCII {FPP INSTRUCTION FAILED TO ABORT, NOT | 
| 
| 
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oS) sag 1h4 101 114 114 SCIZ ‘ALLOWNG EXAMINATION OF SR1; 
Soe hee 115 117 104 €M365: .ASCIZ — 0 oon atten tas ABORTED WHEN IT SHOULD NOT HAVE: 
359 pecs 106 120 120 EM366: .ASCIZ ACCUMULATOR WAS CHANGED IN THE EXPECTED ABORT.: 
9294 064700 107 105 116 EM367: .ASCIZ GENERAL REGISTER WAS CHANGED IN THE EXPECTED ABORT: 
9295 064763 106 120 120 €M370: .ASCIZ ‘FPP UNABLE TO RESTORE AN AC: 
9296 000000 EM371= 
9297 000000 EM372= 
9298 000000 EM373=0 
9299 000000 EM374= 
9300 000000 EM375= 
9301 000000 EM376=0 
9302 000000 EM377=0 
9303 000000 EM400= 
9304 065017 123 000 EM401: .ASCIZ iS! 
9305 065021 377 y 377 3FLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
9306 065022 065030 050045 000000 -WORD  &M401B,EM4B,0 
9307 065030 124 106 120 EM401B: .ASCIZ iTFPS (R): 
9308 065041 123 000 EM402: .ASCIZ iS: 
9309 065043 377 g Ad 377 sFLAGS 'ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
9310 065044 065030 050066 000000 -WORD  &M401B,EM4D,0 
9311 065052 115 000 EM403: .ASCIZ Mi 
9312 065054 377 eld 377 zFLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
9313 065056 065132 065171 056225 -WORD &M403B,EM403C ,PERIOD 
9314 065064 050167 065122 050176 -WORD_ CRBUT, iGR7FL. PRST.N3.N5.N7,WENTTO,N4,N1,N6, INSTOF ,N4,N1.N7,0 
9315 065122 107 122 067 IGR7FL: .ASCIZ GR? FL! 
9316 065132 117 122 105 M4038: .ASCIZ ‘ORE THAN ONE WORD WRITTEN BY S: 
9317 065171 124 106 120 EM403C: .ASCIZ iTEPS (R)i 
9318 065202 123 000 EM404: .ASCIZ 
9319 065204 377 ed 337 sFLAGS ‘ERTYPE’ TO PRINT ADDT*L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
9320 065206 065030 056506 000000 -WORD  &M401B,EM227B,0 
9321 065214 123 000 EM405: .ASCIZ iS: 
9322 065216 377 y td 377 sFLAGS ‘ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
9323 065220 065171 050272 050045 -WORD. EM403C,EM7B,EM4B,0 
9324 065230 123 000 EM406: .ASCIZ iS: 
9325 065232 377 y Ld 377 zFLAGS ‘ERTYPE’ TO PRINT ADDT*L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
9326 065234 065171 050272 050066 -WORD  EM403C,EM7B,EM4D,0 
9327 065244 115 000 EM407: .ASCIZ iM: 
9328 065246 377 yo 377 3FLAGS ‘ERTYPE’ TO PRINT ADDT*L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
9329 065250 065132 065171 050272 -WORD £M4038,EM403C,EM7B 
9330 065256 050167 065122 050176 -WORD_ CRBUT, IGR7FL.PRST,N3,N5.N7,WENTTO,N4,N1,N6, INSTOF .N4,N1,N7,0 
9331 065314 123 000 EM410: .ASCIZ 
9332 065316 377 ytd 377 zFLAGS “ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
9333 065320 065171 050272 056506 ~WORD  &M403C,EM7B,EM227B,0 
9334 065330 123 000 EM411: .ASCIZ iS: 
9335 065332 377 gd 377 ZFLAGS "ERTYPE' TO PRINT ADDT*L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
9336 065334 065342 050045 000000 WORD &M411B,EM4B,0 


9337 065342 124 106 120 £M411B: .ASCIZ ‘TFPS =(R)! 
9338 065354 123 000 EM412: .ASCIZ {S! 


| 
ee | 
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9339 065356 377 


9340 065360 065342 050066 

9341 065366 115 000 

9342 065370 377 

9343 065372 065132 065342 

9344 065400 050167 065122 
9345 065436 12 000 

9346 065440 377 

9347 065442 065342 056506 

9348 065450 123 000 

9349 065452 377 

9350 065454 065462 050045 

9351 065462 124 106 

9352 065475 123 

9353 065477 377 

9354 065500 065462 050066 

9355 065506 123 000 

9356 065510 377 

9357 065512 065462 065520 
9358 065520 040 104 
9359 1854 123 

9360 065554 377 

9361 065556 065462 056506 

9362 065564 123 

9363 065566 377 

9364 065570 065576 050045 

9365 065576 124 106 

9366 065611 123 000 

9367 065613 377 

9368 065614 065576 050066 
9369 065622 123 000 
9370 065624 377 

9371 065626 065576 065520 

9372 065634 123 

9373 065636 377 

9374 065640 065576 056506 
9375 065646 123 000 

9376 065650 377 

9377 065652 065660 050045 
9378 065660 124 106 
9379 065672 123 

9380 065674 3 

9381 065676 065660 050066 
9382 065704 115 000 


MACRO M1113 09-APR-81 


- WORD 
-ASC1Z 
-BYTE 
EVEN 
056225 - WORD 
050176 


000000 
EM413: 


000000 


000000 
120 &M415B: 


EM424: 
EM425: 


120 EM425B: . 
EM426: .ASCIZ 


EM427: 
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SEQUENCE 246 


377 sFLAGS ‘ERTYPE' TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 


EN411B,EM4D.0 

377 

EM4038,EM4118,PERIOD 
CRBUT 


sFLAGS ‘ERTYPE' TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


, 1GR7FL,PRST ,N3,N5.N7,WENTTO,N4,N1,N6, INSTOF ,N4,N1,N7,0 


‘Si 
377 
EM4118,€M227B,.0 

377 :FLAGS "ERTYPE* TO PRINT 


EM415B,EM4B ,0 
iTFPS @(R)+! 


1S} 

377 FLAGS "ERTYPE' TO PRINT 
EN415B.EM4D.0 

377 :FLAGS "ERTYPE* TO PRINT 


EM415B.EM417B,0 
DID NOT DEFER THE WRITE. ! 


igi 

377 FLAGS ‘ERTYPE*® TO PRINT 
pay. EM227B,0 

33 zFLAGS *ERTYPE* TO PRINT 


EM421B,EM4B,0 
iTFPS a=(R): 


53> SFLAGS "ERTYPE* TO PRINT 
EM421B,.EM4D.0 

377, —s; FLAGS “ERTYPE* TO PRINT 
EM421B,EM417B.0 

377, —s; FLAGS “ERTYPE' TO PRINT 
EM421B,EM227B.0 

377, —s; FLAGS “ERTYPE* TO PRINT 


EM425B,EM4B 0 
iTFPS N(R): 


iSi 
377 —-: FLAGS *ERTYPE* TO PRINT 
EM425B,,EMAD 0 


ADDT'L 


ADDT'L 


ADDT'L 


ADDT*L 


ADDT'L 


ADDT'L 


ADDT*L 


ADDT*L 


ADDT'L 


ADDT’*L 


;FLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES 


ASCIZ MSGS, ADDRESSES 2 LINES 


ASCIZ MSGS, ADDRESSES 2 LINES 


ASCIZ MSGS, ADDRESSES 2 LINES 


ASCIZ MSGS, ADDRESSES 2 LINES 


ASCIZ MSGS, ADDRESSES 2 LINES 


ASCIZ MSGS, ADDRESSES 2 LINES 


ASCIZ MSGS, ADDRESSES 2 LINES 
ASCIZ MSGS, ADDRESSES 2 LINES 


ASCIZ MSGS, ADDRESSES 2 LINES 


ASCIZ MSGS, ADDRESSES 2 LINES 


DOWN 


E 


E 


: 


E 


: 


TS a 8; 


DOWN 


aa ae I 


mis) 
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ERROR MESSAGES 
9383 065706 377 “BYTE 377 sFLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
9384 065710 065132 065660 056225 “WORD M4038, EM425B, PERIOD 
9385 065716 37 “BYTE :FLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
065720 050167 065122 050176 “WORD CRBUT, IGR7FL .PRST ,N3,N5,N7,WENTTO,N4,N1,N6, INSTOF ,N4,N1 N70 
9386 065756 123 000 EM430: <.ASCIZ } 
9387 065760 377 “BYTE 377 sFLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
9388 065762 065660 056506 000000 “WORD EM 258. EM227B,0_ 
9389 065770 120 103 040 EM431: .ASCIZ BAD AFTER 
9390 066007 377 yg LS 355 3; FLAGS ‘enrvpe® TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
9391 066010 065660 054342 000000 "WORD &M425B,£M1608,0 
9392 066016 123 000 EM432: .ASCIZ {S! 
9393 066020 377 P ALS 377 sFLAGS ‘ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
9394 066022 066030 050045 000000 “WORD £M432B,EM4B,0 
9395 066030 124 106 120 €M432B: .ASCIZ {TFPS @N(R)! 
9396 066043 123 000 EM433: .ASCIZ {S!} 
9397 066045 377 y Ald 377 sFLAGS ‘ERTYPE' TO PRINT ADDT'L ASCiZ MSGS, ADDRESSES 2 LINES DOWN 
9398 066046 066030 050066 000000 “WORD &M432B,EM4D,0 
9399 066054 115 000 EM434: <:ASCIZ [M! 
9400 066056 377 -BYTE 377 :FLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
9401 066060 065132 066030 056225 "WORD £M403B,EM432B8,PERIOD 
9402 066066 050167 065122 050176 “WORD CRBUT, IGR7FL.PRST.N3.N5.N7,WENTTO,N4,N1,N6, INSTOF .N4,N1.N7,0 
9403 066124 123 000 EM435: .ASCIZ 
9404 066126 377 “BYTE 377 :FLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
9405 066130 066030 056506 000000 "WORD €M432B,EM227B,0 
9406 066136 120 103 040 €M436: :ASCIZ {PC BAD AFTER S! 
9407 066155 377 -BYTE 377 sFLAGS 'ERTYPE' TO PRINT ADDT*L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
9408 066156 066030 054342 000000 "WORD £M432B,EM1608,0 
9409 066164 123 124 103 £M437: :ASCIZ {STCDL A,(R)+) 
9410 066201 377 -BYTE 377 :FLAGS "ERTYPE’ TO PRINT ADDT"L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
9411 066202 050045 000000 “WORD  £M4B,0 
B12 066206 123 124 103 €M440: :ASCIZ iSTCDL A,-(R)! 
9413 066223 377 -BYTE 377 [FLAGS “ERTYPE* TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
9414 066224 050045 000000 “WORD £M4B,0 
9415 0662 125 116 105 €M441: [%ASCIZ {UNEXPECTED } 
9416 066244 376 “BYTE 376 sFLAGS "ERTYPE* TO PRINT ERR # SPECIFIC ASCIZ MSGS, ADRS 3 LINES DOW 
9417 066246 000441 000442 000443 “WORD 441 442,443,0 
9418 066256 066264 066333 066333 "WORD EM441 18, £m442B .EM442B 
9419 066264 1 120 120 €M441B: _ASCIZ * : 
9420 066271 5 -BYTE 377 :FLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
9421 066272 066276 000000 "WORD TRAPTO,O 
942 066276 124 122 101 TRAPTO: .ASCIZ iTRAP TO : 
9423 066307 376 -BvTE 376 SFLAGS "ERTYPE’ TO PRINT ERR # SPECIFIC ASCIZ MSGS, ADRS 3 LINES DOW 


9424 066310 000441 000442 0004435 «WORD 441,442,443,0 





eal ae] 
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9425 066320 066326 066346 066351 «WORD N244,N04,N10 

9426 066326 062 064 064 N2464: .ASCIZ '244.; 

9427 066230 EM442=EM441 

9428 066333 103 120 125 EM442B: .ASCIZ :CPU : 

9429 066340 377 4 377 sFLAGS "ERTYPE' TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
9430 066342 066276 000000 -WORD  TRAPTO,0 

9431 066346 064 056 000 N04: eASCIZ 14.3 

9% 066230 EM443=EM441 

9433 066351 061 060 056 N10: eASCI2. :10.: 

9434 066355 116 105 107 EM444: .ASCIZ NEG: 

9435 066361 377 BYTE 377 sFLAGS ‘ERTYPE' TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 


- EVEN 
9436 066362 054662 050002 000000 -WORD £&M176B,EM38,0 
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9437 -SBTTL DATA TABLE HEADERS 
9438 066370 040 it 


000 
9439 066372 377 y SLA 377 sFLAGS "ERTYPE' TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
9440 066374 066404 066436 066445 -WORD_ DH1B,DH1C,DH1D,0 
9441 066404 0 124 105 DH1B: .ASCIZ i: _TEST.:<TAB>iPC OF CALL.:<TAB>:PC OF ; 
9442 066436 105 122 122 DHIC: .ASCIZ ‘ERROR.: 
9443 066445 011 106 120 DH1D: .ASCIZ <TABD>IFPS.i<TAB>IFEC.: 
066460 000 DH2: ASCIZ i 
9445 066462 377 y atid 377 sFLAGS "ERTYPE' TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
066464 066436 066474 -WORD_ 0H1B,DH1C,DH2B,0 
9447 066474 011 107 117 DH2B: .ASCIZ <TAB>:GOT FPS.:<TAB>: EXPECTED FPS.: 
9448 066524 000 DH3: ASCIZ ii 
9449 066526 377 y $3 377 FLAGS ‘ERTYPE’ TO PRINT ADDT'I. ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
9450 0665 066436 066540 -WORD_ DH1B,DH1C,DH38,0 
9451 066540 011 107 117 DH3B: .ASCIZ <TAB>:GOT FEC.:<TAB>: EXPECTED FEC.: 
9452 066570 040 000 DH4: eASCIZ i 
9453 066572 377 yg Hs 377 FLAGS ‘ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
9454 066574 066404 066436 066604 -WORD_ DH1B,DH1C,DH4B,0 
9455 066604 011 107 117 DH4B: .ASCIZ <TAB>!GOT RO. ‘<TAB>‘EXPECTED RO.: 
9456 066633 040 000 DHS: eASCIZ i 
9457 066635 377 Fret 377 FLAGS ‘ERTYPE* TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
9458 066636 04 066436 000000 -WORD DH1B,DH1C,0 
9459 33 DH6=DH5 
066570 DH7=DH4 
9461 33 DH10=DH5 
066570 DH11=DH4 
9463 33 DH12=DH5 
9464 066644 040 040 124 DH13: .ASCIZ | TEST.:<TAB>:PC OF CALL.i<TAB>:PC OF TRAP.: 
9465 4 DH14=DH13 
9466 066633 DH15=DH5 
9467 066704 040 000 DH16: .ASCIZ i i 
9468 066706 377 y tA 377 sFLAGS ‘ERTYPE' TO PRINT ADDT*L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
9469 066710 066404 066436 066720 -WORD  DH1B,DH1C,DH168,0 
9470 066720 011 107 117 DH168: .ASCIZ <TAB>:GOT PC. :<TAB>: EXPECTED PC.: 
9471 4 DH17=DH13 
9472 066570 DH20=DH4 
066633 DH21=DH5 
9474 066633 DH22=DH5 
9475 066644 DH23=DH13 
9476 066570 DH24=DH4 
9477 066633 DH25=DH 
9478 4 DH26=DH13 
9479 066570 DH27=DH 
066633 DH30=DH5 
9481 4 DH31=DH13 
066570 H32=DH4 
9483 066633 DH335=DH5 
4 DH34=DH13 
9485 066570 DH35=DH4 
33 DH36 


9486 0666 =DH5 
9487 066747 040 000 DH37: .ASCIZ : i 





| 
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9488 066751 377 eA 377 zFLAGS ‘ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
9489 066752 066404 066436 066762 -WORD_ DH1B,DH1C,0H37B,0 
9490 066762 011 107 117 DH37B: _.ASCIZ <TAB>:GOT FPS.:<TAB>: EXPECTED FPS.: 
9491 066747 DH40=DH37 
9492 067012 040 000 DH41: .ASCIZ i i 
9493 067014 377 y 377 zFLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
9494 067016 066404 066436 067026 -WORD_ DH1B,DH1C,DH41B,0 
9495 067026 011 106 120 DH41B: _.ASCIZ <TAB>!FPS.{<TAB>!GOT FEC. EXPECTED FEC.! 
9496 066747 DH42=DH37 
9497 066747 DH43=DH37 
066747 DH44=DH37 
066747 DH45=DH37 
9500 066747 DH46=DH37 
9501 066747 DH47=DH37 
9502 066747 DH50=DH37 
9503 066747 DH51=DH37 
066747 DH52=DH37 
9505 067012 DH53=DH41 
95 47 DH54=DH37 
9507 747 DH55=DH37 
95 066747 DH56=DH37 
9509 066747 DH57=DH37 
9510 066747 DH60=DH37 
9511 066747 DH61=DH37 
9512 066460 DH62=DH2 
9513 066524 DH63=DH3 
9514 33 DH64=DH5 
9515 60 DH65=DH2 
9516 066570 DH66=DH4 
9517 60 DH67=DH2 
9518 066524 DH70=DH3 
9519 066460 DH176=DH2 
9520 067063 124 105 123. DH177: _.ASCIZ iTESTNO ERR PC CPUERR: 
9521 066633 DH71=DH5 
9522 066460 DH72=DH 
9525 066644 DH107=DH13 
9524 33 DH73=DH5 
9525 066570 DH74=DH4 
9526 60 75=DH 
27 % DH76=DH107 
9528 33 DH77=DH 
29 066570 DH100=DH4 
30 DH101=DH 
9531 DH102=DH107 
33 H103=DH 
9533 066570 H104=DH4 
60 DH105=DH2 
9535 4 DH106=DH107 
33 DH110=DH5 
9537 066570 DH111=DH4 
9 60 DH112=DH2 
9539 066644 DH113=DH107 
9540 33 DH114=DH5 
9541 066570 DH115=DH4 


9542 066460 DH116=DH2 


ae 
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9543 066644 DH117=DH107 
9544 066633 DH120=DH5 
9545 066570 DH121=DH4 
46 066460 DH122=DH2 
9547 066644 DH123=DH107 
9548 066633 DH124=DH5 
9549 066570 DH125=DH4 
066460 DH126=DH2 
9551 066644 DH127=DH107 
955 066633 DH130=DH 
9553 066460 DH131=DH 
9554 066644 DH132=DH107 
9555 066633 DH133=DH 
9556 066460 DH134=DH2 
9557 066633 DH135=DH5 
9558 066633 DH136=DH5 
9559 60 DH137=DH2 
33 DH140=DH5 
9561 066570 DH141=DH4 
9562 066460 DH142=DH2 
9563 066633 DH143=DH5 
066570 DH144=DH4 
9565 60 DH145=DH2 
33 DH146=DH5 
9567 066570 DH147=DH4 
9568 60 DH150=DH2 
33 DH151=DH5 
9570 066570 DH152=DH4 
9571 60 DH153=DH2 
72 33 DH154=DH5 
9573 066570 DH155=DH4 
74 60 DH156=DH2 
9575 066633 DH157=DH5 
9576 066570 DH160=DH4 
9577 60 DH161=DH2 
066633 DH162=DH5 
9579 066460 DH163=DH2 
9580 704 DH164=DH16 
9581 066747 DH165=DH37 
9582 066747 DH166=DH37 
9583 066747 DH167=DH37 
066747 DH170=DH37 
9585 066747 DH171=DH37 
47 DH172=DH37 
9587 067012 DH173=DH41 
9588 067012 DH174=DH41 
9589 067012 DH175=DH41 
47 DH200=DH37 
9591 066747 DH201=DH37 
9592 066747 DH202=DH37 
9593 066747 DH203=DH37 
9594 066747 H204=DH37 
9595 066747 DH205=DH37 
066747 DH206= 
9597 066747 DH207=DH37 


9598 
9599 066747 DH211=DH37 
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9600 066747 DH212=DH37 
9601 066747 DH213=DH37 
3602 066747 DH214=DH37 
9603 704 DH215=DH16 
066633 DH216=DH5 
9605 066570 DH217=DH4 
60 DH220=DH2 
9607 066704 DH221=DH16 
33 DH222=DH 
066570 H223=DH4 
9610 60 DH224=DH2 
9611 066570 DH225=DH4 
12 60 DH226=DH2 
9613 067112 040 000 DH227: .ASCiZ i! 
9614 067114 377 y od 377 zFLAGS 'ERTYPE' TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
. V 
9615 067116 066404 067124 000000 -WORD  DH1B,DH227B,0 
9616 067124 124 122 101 DH227B: .ASCIZ ‘TRAP. : 
17 066570 DH230=DH4 
9618 066460 DH231=DH2 
9619 067112 DH232=DH227 
9620 066570 DH233=DH4 
9621 0664 DH234= 
9622 067112 DH235=DH227 
9625 066570 DH236=DH4 
9624 066460 DH237=DH2 
9625 067112 DH240=DH227 
9626 066570 DH241=DH4 
9627 066460 DH242=DH2 
9628 067112 DH243=DH227 
066570 DH244= 
066460 DH245=DH2 
9631 066704 DH246=DH16 
9632 067112 DH247=DH227 
9633 066570 DH250= 
34 066460 251=DH2 
9635 066704 DH252=DH16 
36 067112 DH253=DH227 
9637 066704 DH254=DH16 
38 067112 DH255=DH227 
9639 066570 H256=D 
0 066460 DH257=DH2 
9641 066747 60=D 
9642 066747 DH261=DH37 
9643 066747 DH262=DH37 
9644 066747 DH263=DH37 
9645 066747 DH264=DH37 
9646 066747 DH265=DH37 
9647 066747 DH266=DH37 
9648 066747 DH267=DH37 
066747 DH270=DH37 
9650 066747 DH271=DH37 
9651 066747 DH272=DH37 
9652 066747 DH273=DH3 
9653 066747 DH274=DH37 


9654 
9655 066747 DH276=DH37 





DATA TABLE HEADE 


9 
9704 067132 
9705 067134 


9706 067136 
9707 067146 
9708 


9709 
9710 067176 
9711 067206 


RS 


CKFPCCO FPIIF FLTG PNT PRT C 
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DH277=DH37 
DH300=DH37 





SEQUENCE 253 


FLAGS “ERTYPE® TO PRINT ADDT'L ASCIZ2 MSGS, ADDRESSES 2 LINES DOWN 


DH1B,DH1C ,DH357B,0 
<TAB>: GOT FEA. !<TAB>: EXPECTED FEA.: 


ZFLAGS “ERTYPE® TO PRINT ADDT"L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 


—— 





Sciaseiidaaaehtdk eieteaedtaamadindea | r 


j 

H 4 

| CKFPCCO FPTIF FLTG PNT PRT C MACRO M1113 O09-APR-81 13:53 PAGE 100-5 SEQUENCE 254 { 
| DATA TABLE HEADERS \ 


EVEN 

712 06720 04 066436 067212 WORD DH18,DH1C ,DH362B,0 
3 06721 011 115 115 DH362B: .ASCIZ <TAB>:MMRO: 
9714 067220 940 000 DH363: .ASCIZ : } 
9715 067222 77 “BYTE 377 :FLAGS "ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
9716 067224 04 066436 067234 ; DH18, DH1C ,DH362B,0 
9717 0672346 011 123 122 DH363B: -ASCIZ <TAB>!SR1!<TAB>; CALCD! <TAB>! EXPECTED: 
9718 067260 040 000 DH364: .ASCIZ |} 
9719 067262 377 “BYTE 377 SFLAGS “ERTYPE’ TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 

9720 067264 04 067272 000000 DH18,DH3648,,0 
9721 067272 111 116 123 DH3648: .ASCIZ !INSTRUCTION FAILING TO ABORT: 
9722 067327 040 000 DH365: .ASCIZ | ! 
9723 067331 377 -BYTE 377 :FLAGS “ERTYPE* TO PRINT ADDT’L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
9724 067332 066404 066436 000000 : DH1B,DH1C,0 
9725 067340 040 600 DH366: .ASCIZ | 
9726 067342 377 “BYTE 377 ZFLAGS “ERTYPE*-TO PRINT ADDT°L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
9727 06 04 066436 067355 DH1B,DH1C, ppnsees. 0. 
9728 067354 011 101 10 CASCIZ <TABSIAC @ 
9729 067372 040 000 DH367: .ASCIZ | } 
9730 067374 377 “BYTE 377 SFLAGS “ERTYPE* TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN 
9731 067376 066436 067406 WORD DH1B,DH1C,DH367B,0 
9732 067406 122 1 <TAB>!REG #!<TAB> !RECEIVED!<TAB>: EXPECTED: 

040  TEST:<TAB>!PC OF CALL:<TAB>!AC #!<TAB>!PC OF ERROR: 


9733 067437 
9734 
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DATA TABLE HEADERS 





9763 066460 DH426=DH2 

9764 066644 DH427=DH13 

9765 067112 DH4 30=DH227 

97 5 DH431=DH13 

9767 066570 DH432=DH4 

9768 DH4335=DH2 

9769 DH434=DH1 

9770 067112 DH435=DH227 

9771 4 DH436=DH1 

9772 066570 DH437=DH4 

9773 066570 DH440=DH4 

9774 067502 040 000 DH441: .ASCIZ i 

9775 067504 377 yt 377 zFLAGS “ERTYPE' TO PRINT ADDT'L ASCIZ MSGS, ADDRESSES 2 LINES DOWN | 
. Vv 


9776 067506 066404 066436 067516 -WORD_ DH1B,DH1C,DH441B,0 
9777 067516 11 106 105 41B: .ASCIZ <TAB>:FEC.: 
9778 067327 DH442=DH365 


DH444=DH3 


ca ea a a ae ea a a a i a a A I, el i ee a , S 


a rrr 
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FORMAT SPECIFICATIONS FOR THE DATA TABLES | 


9781 -SBTTL FORMAT SPECIFICATIONS FOR THE DATA TABLES | C 
9782 067524 004 000 00S DF1: -BYTE 4,0.5,0,5.0,0 C 
9784 067533 DF 3=DF 2 { 
9785 067533 DF4=DF2 | { 
9786 067543 004 000 005 DF5: BYTE 4,0,5,0,5.5,2,5,5.2 | [ 
9787 067555 004 000 00S DF6: -BYTE 4,0,5,0 | { 
9788 067533 DF 7=DF4 | [ 
9789 067543 DF 10=DF5 ( 
9790 067533 DF11=DF4 | 
9791 067561 004 000 005 DFi2: .BYTE 4,0,5,0,5,5,3,5.5.,3 ( 
9792 067555 DF 13=DF6 { 
9793 067555 DF 14=DF6 { 
067561 DF 15=DF12 { 
9795 067533 DF 16=DF 2 { 
9796 067555 DF 17=DF6 { 
9797 067533 DF 20=DF 2 { 
067561 DF21=DF 12 ( 
9799 067561 DF 22=DF12 ( 
067555 DF 23=DF6 { 
9801 067533 DF 24=DF 2 { 
9802 067561 DF 25=DF 12 { 
9803 067555 DF 26=DF6 { 
067533 DF 27=DF 2 { 
9805 067561 DF 30=DF 12 ( 
067555 DF 31=DF6 ( 
9807 067533 DF 32=DF 2 | 
067561 DF 33=DF 12 { 
067555 =DF6 { 
9810 067533 DF 35=DF 2 { 
9811 067561 DF 36=DF 12 { 
9812 067573 004 000 OOF DF37: _.BYTE 4,0,5,0,5,0,5.0,5.5.3.5.5.3.5.5.3 | 
981 067573 DF 40=DF 37 | 
9814 067614 004 000 005 DF41: .BYTE 4,0,5,0,5,0,0,0.5.5,3.5.5.3.5,5.3 | 
9815 067573 DF 42=DF 37 | 
9816 067573 DF 43=DF 37 | 
9817 067573 DF 44=DF 37 | 
9818 067573 DF 45=DF 37 | 
9819 067573 DF 46=DF 37 | 
067573 DF 47=DF 37 | 
9821 067573 DF 50=DF 37 | 
9822 067573 DF 51=DF 37 | 
9823 067573 DF S2=DF 37 | 
9824 067573 DF 53=DF 37 | 
9825 067573 DF 54=DF 37 | 
9826 067573 DF 55=DF 37 | 
9827 067573 DF 56=DF 37 | 
9828 067573 DF 57=DF 37 | 
067573 DF 60=DF 37 
067573 DF 61=DF 37 | 
9831 067533 DF 62=DF 2 
9832 067533 DF 63=DF 2 
9833 067543 DF 64=DF5 
067533 DF 65=DF 2 
9835 067533 DF 66=DF 2 
067533 DF 67=DF 2 





9836 = 
9837 067533 DF 70=DF 2 
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| 
9838 067533 DF 176=DF 2 | 
9839 067635 004 000 000 OF177: .BYTE 4,0.,0 | 
9840 067640 004 000 00S DF71: .BYTE 4,0,5,0,5,5,3,5,5.3.5,5,3 
1 067533 DF 72=DF 2 
9842 067555 DF 107=DF6 
9843 640 DF 73=DF 71 
9844 067533 DF74=DF2 
9845 067533 DF 75=DF 2 
9846 067555 DF 76=DF6 
9847 067640 DF77=DF 71 
9848 067533 DF 100=DF 2 
067533 DF101=DF2 
9850 067555 DF 102=DF6 
9851 067640 DF 103=DF 71 
9852 067533 DF 104=DF 2 
9853 067533 DF 105=DF 2 
9854 067555 DF 106=DF6 
9855 067 DF 110=DF 71 
9856 067533 DF111=DF2 
9857 067533 DF112=DF2 
9858 067555 DF 113=DF6 
9859 067 DF 114=DF71 
067533 DF115=DF2 
9861 067533 DF 116=DF 2 
9862 067555 DF117=DF6 
9863 06764 DF 120=DF 71 
9864 067533 DF121=DF2 
9865 067533 DF 122=DF 2 
067555 DF 123=DF6 
9867 06764 DF 124=DF 71 
067533 DF 125=DF 2 
067533 DF 126=DF 2 
9870 067555 DF 127=DF6 
9871 067640 DF 130=DF 71 
9872 067533 DF 131=DF 2 
067555 F 132=DF 
9874 7640 DF 133=DF71 
9875 067533 DF 134=DF 
9876 067561 DF 135=DF 12 
067561 DF 136=DF 12 
9878 067533 DF 137=DF 
9879 067561 DF 140=DF 12 
067533 DF 141=DF 2 
9881 067533 DF 142=DF 2 
9882 067561 DF 143=DF 12 
9883 067533 DF 144=DF 2 
067533 DF 145=DF 2 
9885 067561 DF 146=DF 12 
067533 DF 147=DF 2 
9887 067533 DF 150=DF 
067561 DF151=DF 12 
9889 067533 DF 152=DF 
9890 067533 DF 153=DF 2 
9891 067561 DF 154=DF 12 
9892 067533 DF 155=DF 
9893 067533 DF 156=DF 
9894 067561 DF 157=DF 12 
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9895 067533 DF 160=DF 2 
9896 067533 DF 161=DF2 
9897 067561 DF 162=DF 12 
9898 067533 DF 163=DF 2 
9899 067533 DF 164=DF 2 
9900 067533 DF 215=DF 2 
9901 067561 DF 216=DF 12 
9902 067533 DF217=DF2 
9903 067533 DF 220=DF 2 
9904 067533 DF 221=DF2 
9905 067561 DF 222=DF 12 
9906 067533 DF 225=DF 
9907 067533 DF 224=DF 2 
9908 067573 DF 165=DF 37 
9909 067573 DF 166=DF 37 
9910 067573 DF 167=DF 37 
9911 067573 DF 170=DF 37 
9912 067573 DF 171=DF 37 
9913 067573 DF 172=DF 37 
9914 067614 DF 173=DF41 
9915 067614 DF 174=DF 41 
9916 067614 DF 175=DF 41 
9917 067573 DF 200=DF 37 
9918 067573 DF 201=DF 37 
9919 067573 DF 202=DF 37 
9920 067573 DF 203=DF 37 
9921 067573 DF 204=DF 
9922 067573 DF 205=DF 37 
9923 573 DF 206=DF 37 
9924 067573 DF 207=DF 37 
9925 067573 DF 210=DF 37 
9926 067573 DF 211=DF 37 
9927 73 DF 212=DF 37 
9928 067573 DF 213=DF 37 
9929 067573 DF 214=DF 37 
9930 067655 000 00S DF225: .BYTE 4,0,5.0,5.0,5.0 
9931 067655 DF 226=DF 
9932 067665 000 00S DF227: BYTE 4,0,5,0 
9933 067655 DF 230=DF 225 
9934 067655 DF 231=DF 225 
9935 7665 OF Sato 27 
067655 DF 235=DF 225 
9937 067655 DF 234=DF 225 
7665 DF 235=DF 227 
9939 067655 DF 236=DF 22 
067655 DF 237=DF 225 
9941 7665 DF 240=DF 227 
067655 DF 241=DF 225 
9943 067655 DF 242=DF 225 
9944 067665 DF 2435=DF 227 
9945 067655 DF 244=DF 225 
9946 067655 DF 245=DF 225 
9947 067655 DF 246=DF 225 
9948 067665 DF 247=DF 227 
9949 067655 DF 250=DF 225 
9950 067655 DF 251=DF 225 


9951 067655 DF 252=DF 225 
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9952 067665 DF 253=DF 227 
9953 067655 DF 254=DF 225 
9954 5 DF 255=DF 227 
9955 067655 DF 256=DF 225 
9956 067655 DF 257=DF 225 
9957 067671 004 000 005 DF260: .BYTE 4.0,5,0,5,0,5.0,5,5,2,5,5.2,5,562 
9958 067671 DF 261=DF 260 
9959 067671 DF 262=DF 260 
9960 067671 DF 263=DF 260 
9961 067671 DF 264=DF 260 
067671 DF 265=DF 260 
9963 067671 DF 266=DF 260 
067671 DF 267=DF 260 
9965 067671 DF 270=DF 260 
067671 DF 271=DF 260 
9967 067671 DF 272=DF 260 
9968 067712 004 000 005 DF 27. : -BYTE 4.0,5.0,5.0.5,.0.5.5.2.3.$c3e5 2503 
9969 067712 DF 274=DF 273 
067712 DF 275=DF 273 ; 
9971 067712 DF 276=DF 273 
9972 067712 DF 277=DF 273 
9973 067712 DF 300=DF 273 
9974 067733 004 000 005 DF 301: -BYTE 4,0,5.0,5,0,5.0,5.,5.3.5 4520.5 .5 23030205 
997 067733 DF 302=DF 301 


pada 067757 004 000 005 DF303: aprre 4,0,5.0,5,0,0,0,5.5.3,5,5.0,5,5,3,5.545 


4,0,5.0,5,0,5.0.5.5,3,5,5.2,5.502 
4,0,5.0,5.0,0.0,5.5,3,5,5.2.5.5.2 


9998 
9999 
0000 
0001 
0002 
0003 
0004 
0005 
0006 
0007 
0008 


i 


DF 34 ze 
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: 


3388888888388 
RUSSaseanan=S 


1 
10023 
10024 


Seeeeeree’ 


8888 
ys? eed 


070066 
070112 
070120 


8 


888 888 
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005 





DF 344=DF 322 
DF 345=DF 322 
he 


MN 
MoNsnoenonononenonors 
NMYINN NMI NOT 


4,0,5,0,5,0,5.0,5,5,3,5.5.0,5,5.0 


2525.0,5,5.0.5-5-0,5,5.0 


& 
o Oo 


-0,0,0,0.5,5,0,0,0,0 
-0,0,0,5,5,0,0,0,0 
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10066 067665 * <35=DF 227 

10067 067665 * +4 36= 

10068 067655 DF 437=DF 225 

10069 067655 DF440=DF 225 

10070 070203 004 000 005 DF441: .BYTE 4,0.5.0,5.0 
10071 070203 DF442=DF441 

10072 070203 DF 443=DF 441 

10073 067533 DF444=DF 2 


CKFPCCO FP11F FLTG PNT PRT C 
ERROR MESSAGE DATA TABLES 


1 
10076 


10098 


: 


ek ee ed ed ed od od od 


errr rrrrrrrrrrrerererrrtrYrrrrerereepelet 
lelelelelelelelelelelelelelelelelelelelelelolelelol=lelelejelelo) 
NMMNVNNNNNDN 2 2 @ 2 2 ee ee lolelelolelelo) 


ek a od on ot = = td SS SS SS SS 


ww 
— 


070212 
32 


070346 


070360 


070402 
070424 


070446 
070466 


001234 


001234 
001240 


001234 
047563 


¢ 5 
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047503 


047503 
001313 


047503 
001240 


Dra}: - WORD 


DT65=DT16 





262 


ERROR MESSAGE DATA TABLES 
STMPO,STMP1 STAB, SrHP2, STAB, gS oSTMP4 0 


# 0 
STMPO.$TMP1 .$TAB.STMP2.$TAB, STMP4.$TAB. STMP3,0 
$TMPO.$TMP1 .$TAB,$TMP2,$CRLFMS1,$TMP3_ 
SCRLF .MS2,$TMP4, 
$TMPO.$TMP1,$TAB, $TMP2,0 


STMPO,STMP1 ,$TAB, $TMP2,$TAB,STMP4 ,$TAB, STMP3,0 


STMPO,STMP1 gst his, Btn) ais cee ye 
MS4,$TMP3,$CRLF .MS1,$TMP4,$CRLF .MS2,$TMP5,0 


STMPO,STMP1 ,STAB,STMP2,$TAB,STMP7,STMP11,$TMP12 
SCRLF -MS4,$TMP3,$CRLF .MS1,$TMP4,$CRLF .MS2,$TMP5,0 


D5 
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10132 070276 DT66=DT4 
1013 070276 DT67=DT4 
10134 070276 DT70=DT4 
10135 0702 DT176=DT4 
10136 070512 001232 001116 044020 DT177: .WORD $TMPO,SERRPC,CPSAVE,0 
10137 070522 001232 001234 047503 DT71:  .WORD $TMPO.$TMP1,$TAB,$IMP2,SCRLF,.MS3,$TMP3,$CRLF .MS1 
10138 070544 001244 001313 047523 “WORD $TMP5.S$CRLF.MS2,$TMP4,9 
10139 070276 DT72=DT4 
10140 070346 DT107=DT6 
10141 070556 001232 001234 047503 DT73:  .WORD $TMPO,$TMP1,$TAB,STMP2,$CRLF.MS4,STMP4 
10142 070574 001313 047505 001244 "WORD  $CRLF.MS1,$TMP5,$CRLF .MS2,$TMP3,0 
10143 070276 DT74=DT4 
10144 070232 DT75=DT2 
10145 34 DT76=DT6 
10146 070556 DT77=DT73 
10147 070276 DT100=DT4 
10148 070232 DT101=DT2 
10149 070346 DT102=DT6 
10150 70 DT103=DT73 
10151 070276 DT104=DT4 
10152 070232 DT105=DT2 
10153 7034 DT106=DT6 
10154 070556 DT110=DT73 
10155 070276 DT111=DT4 
10156 070232 DT112=DT2 
10157 34 DT113=DT6 
10158 070556 DT114=DT73 
10159 070276 DT115=DT4 
10160 070232 DT116=DT2 
10161 DT117=DT 
10162 070556 0T120=DT73 
10163 070276 DT121=DT4 
10164 070232 DT122=DT2 
10165 34 DT123=DT 
10166 070556 D1124=D173 
10167 070276 DT125=DT4 
10168 070232 DT126=DT2 
10169 346 DT127=DT6 
10170 070556 D1130=DT73 
10171 070232 DT131=DT 
10172 70346 DT132=DT 
10173 070556 DT133=DT73 
10174 070232 DT134=DT2 
10175 070320 D1T135=DT5 
10176 DT136=DT 
10177 DT137=DT16 
10178 DT140=DT5S 
10179 070276 DT141=DT4 
10180 070276 DT142=DT4 
10181 070320 DT143=DT5 
10182 070276 DT144=DT4 
10183 070276 DT145=DT4 
10184 DT146=DT5 
10185 070276 DT147=DT4 
10186 070276 DT150=DT4 
10187 070320 DT151=DT5 
10188 070276 D1152=DT4 








CKFPCCO FP11F FLTG PNT PRT C 
ERROR MESSAGE DATA TABLES 


10189 070276 
10190 070320 
10191 070276 
10192 070276 
10193 070320 
10194 07027 
10195 070276 
10196 070320 
10197 070276 
10198 070276 
10199 070276 
10200 070320 
10201 070276 
10202 070276 
10203 070276 
10204 070320 
10205 070276 
10206 070276 
10207 070402 
10208 070402 
10209 070402 
10210 070402 
10211 70402 
10212 070402 
10213 070446 
10214 070446 
10215 070446 
10216 070402 
10217 70402 
10218 070402 
10219 070402 
102 070402 
10221 070402 
1 070402 
10223 070402 
10224 070402 
10225 0 
10226 070402 
10227 070402 
10228 0704 
10229 670276 
30 070276 
10231 07034 
10232 070276 
10233 070276 
234 070346 
10235 070276 
236 070276 
10237 07034 
238 070276 
10239 070276 
10240 070346 
10241 070276 
10242 070276 
10243 07034 
10244 070276 
10245 070276 


€ 3 
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DT153=DT4 


DT245=DT4 


SEQUENCE 264 


F 5 
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10246 070276 DT246=DT4 


10247 070346 DT247=DT6 
10248 070276 DT250=DT4 
10249 070276 DT251=DT4 
10250 070276 DT252=DT4 
10251 70346 DT253=DT6 
10252 070276 DT254=DT4 
10253 346 DT255=DT6 
10254 070276 DT256=DT4 
10255 070276 DT257=DT4 
10 070402 DT260=DT37 
10257 070402 DT261=DT37 
10258 070402 DT262=DT37 
10259 070402 DT263=DT37 
10260 070402 D1264=DT37 
10261 070402 DT265=D137 
10 070402 DT266=DT37 
10263 070402 D1267=D1T37 
1 070402 DT270=DT37 
10265 070402 DT271=DT37 
70402 DT272=DT37 
10267 070402 DT273=DT37 
10268 0402 DT274=DT37 
10269 070402 DT275=DT37 
10270 070402 DT276=DT37 
10271 070402 DT277=DT37 
72 070402 DT300=DT37 
10273 070612 001232 001234 047503 DT301: .WORD $TMPO,STMP1,$TAB,STMP2,$TAB,STMP7,$TAB,STMP10 
10274 070632 001313 047545 001240 «WORD $CRLF,MS10,$TMP3,S$CRLF .MS11,$TMP4 


10275 070646 001313 047505 001246 “WORD  $CRLF.MS1,$TMP6,$CRLF .MS2,$TMP5 ,0 

10276 070612 DT302=DT301 

10277 070664 001234 DT303: .WORD $TMPO,$TMP1,$TAB,STMP2,$TAB,STMP7,STMP11,$TMP12 
10278 070704 001313 047545 001240 «WORD $CRLF,MS10,$TMP3,$CRLF .MS11,$TMP4 

4's ta 070720 001313 047505 001246 WORD  $CRLF.MS1,$TMP6,$CRLF .MS2,$TMP5,0 


070612 D1304=DT301 
10281 070612 DT305=DT301 
10282 070612 DT306=DT301 
10283 070612 D1T307=DT301 
070612 DT310=DT301 
10285 070612 DT311=DT301 
10286 070612 D1T312=DT301 
10287 070612 DT313=DT301 
070612 D1314=DT301 
10289 070612 D1315=DT301 
0 070612 DT316=DT301 
10291 070612 D1317=DT301 
10292 12 DT320=DT301 
070612 DT321=DT301 
10294 070736 001232 001234 047503 DT322: .WORD STMPO, STMP1,$TAB, STMP2. STAB, STMP7, STAB, STMP10 
10295 070756 001313 047545 001240 "WORD $CRLF.MS10,$TMP3.S$CRLF .MS1,$TMP4,$CRLF .MS2,STMP5,0 
10296 070736 D1323=DT322 
10297 071002 001232 001234 047503 DT324: . WORD $TMPO,STMP1,.$TAB,STMP2,.$TAB,STMP7,STMP11,$TMP12 
10298 071022 001313 047545 001240 WORD SCRLF .MS10,$TMP3.$CRLF .MS1,$IMP4, $CRLF .MS2,$TMP5,0 
1 970756 D1325=DT322 
0 70736 DT 326=DT322 
10301 070736 DT =DT322 
10302 070736 D1330=DT322 
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DT331=DT322 


DT367: 


DT414=DT6 
DT415=DT4 


SEQUENCE 


STMPO,STMP1,$TAB, STMP2,$TAB, STMP3 
$TMPO.$TMP1 .$TAB.STMP13,$TAB, Mae ly $STMP3,EXPCTD,O 
$TMPO.$TMP1 .$TAB.$TMP13.0 


STMPO,STMP1, STAB, STMPI3. $TAB, STMP2 
SCRLF .MS2,$TMP3 TMP7 
SCRLF. MSI. ‘Srpi6, sTwPil $TMP12,$TMP21,0 
$T 1,$TAB.$TMP2,$TMP13, $TAB, $TMP6, STAB, STMP3,0 
SIMPO.STRPT. “STAB. STMP2, THP13. 

SCRLF .MS21,$TMP3,$TMP4.STMP6,$ 

SCRLF .MS20. ‘tyes, $TMPi1, SIMPIe STP et. 0 


266 
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10360 gee DT416=DT4 
10361 070 D1417=DT6 
4 346 DT420=DT6 
1036 070276 DT421=DT4 
0364 070276 DT422=DT4 
10365 D1425=D16 
Q 070346 DT424=DT6 
10367 070276 DT425=DT4 
10368 070276 DT426=DT4 
10369 346 DT427=DT6 
10370 070346 DT430=DT6 
10371 346 DT431=DT6 
1037 070276 DT432=DT4 

1 070276 D1433=DT4 
10374 0 D1434=DT6 

1 070346 D1435=DT6 
10376 070346 D1436=DT6 
10377 070276 D1437=DT4 
103 070276 DT440=DT4 
10379 071256 001232 001234 047503 DT441: .WORD $STMPO,STMP1.STAB,SIMP2, STAB, STMP3,0 
10380 071274 001232 001234 047503 DT442: .WORD STMPO,STMP1,$TAB,STMP2,0 
10381 071274 D1445=DT442 
10382 670276 DI444=DT4 


10383 000001 - END 





mi 
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AABBFO 01361 CCB10 §=©013710 rit. = 067555 DF211 = 067573 
AABDON 01364 AMSGTY= 000000 CCB15 013726 DF 130 = 067640 esis = 067573 
AABTP1 013622 AMTYP1= 000000 CCB2 013664 DF131 = 067533 DF 213 = 067573 
AABTP2 0136 AMTYP2= 000000 CKSWR = 104406 at = 067555 DF214 = 067573 
AAB) 013434 AMTYPS= 000000 CNT = 000445 DF1335 = 06764 DF215 = 067533 
vee 013536 AMTYP4= 000000 CPSAVE 044020 DF 134 = 06753 DF216 = 067561 
AAB 013556 APASS = 000000 CPSPUR 047302 DF135 = 067561 DF217 = 067533 
AABG 013574 APRIOR= 000000 CPTWO 047330 DF 136 = 067561 DF22 = 067561 
023766 APTCSU= 000040 CR = 000015 DF137 = 067533 DF220 = 067533 
AACTP1 023672 TENV= 000001 CRBUT 050167 DF14 = 067555 DF221 = 067533 
AAC! 023612 APTSIZ= 000200 CRLF = ses DF140 = 067361 DF 222 = 067561 
AAC10 § 023676 APTSPO= 000100 DATA = 117760 DF141 = 067533 DF 223 = 067533 
AAC11 = 023714 G= 000000 DDBBFO 01424 DF 136 = 067533 DF224 = 067533 
AAC2 023646 ATESTN= 000000 0142 DF143 = 067561 DF225 067655 
C20 023732 AUNIT = 000000 DDBTP1 014222 DF144 = 067533 DF 226 = 067655 
SE = 000000 = 000000 DDBTP2 014232 DF145 = 067533 DF 227 
ACDw1 = 000000 AVECT1= 000000 DDBTPS 014252 DF146 = 067561 DF23_ = 067555 
ACDW2 = 000000 AVECT2= 000000 DDB 014050 DF147 = 067533 F230 = 067655 
ACPUOP= 000000 056200 DDB2 014114 DF15 = 067561 DF231 = 067655 
Aco = DON 024144 DDBS 014156 DF150 = 067533 Of Sa8 = 067665 
AC1 =%000001 BBCTP1 024052 DDB6 014204 DF151 = 067561 DF233 = 067655 
AC2 =%000002 23772 DDC 024340 DF 13¢ = 067533 34 = 067655 
AC3 =%000003 BBC10 024056 DDCTP1 024240 DF153 = 067533 DF235 = 067665 
AC4 =%000004 BBC11 024074 DDC1 024150 DF154 = 067561 DF 236 = 067655 
ACS =%000005 BBC2 024026 DDCIC §=024252 DF155 = 067533 DF237 = 067655 
AC6é =%000006 C 024112 DDC11 024270 DF156 = 067533 DF24 = 06753 
AC? _=%000U07 BITO = 000001 DDC2 024206 DF157 = 067561 DF240 = 067665 
ADDWO = 000000 B1TO0O = 000001 DDC20 024306 DF16 = 067533 DF241 = 06765 
ADDW1 = 000000 B1T01 = 000002 DDISP = 177570 DF160 = 067533 DF242 = 067655 
ADDW10= 000000 BITO2 = 000004 DF 1 067524 DF161 = 067533 DF 245 = 067665 
ADDW11= 000000 B1T03 = 000010 DF10 = 067543 DF 16¢ = 067561 DF 244 = 067655 
ADDW12= 000000 B1T04 = 000020 DF100 = 067533 DF1635 = 067533 DF245 = 06765 
ADDW13= 000000 BITOS = 000040 DF101 = 067533 DF164 = 067533 DF 246 = 067655 
ADDW14= 000000 B1TO06 = 000100 ASS = 067555 DF165 = 067573 DF 247 = 06766 
ADDW15= 000000 B1T07 = 000200 DF103 = 067640 DF166 = 067573 25 = 06756 
ADDW2 = 000000 BITO8 = 000400 DF104 = 067533 DF167 = 067573 DF250 = 067655 
ADDWS = 000000 BITO9 = 001000 DF105 = 067533 DF17 = 067555 DF251 = 06765 
ADDW4 = 000000 BIT1 = 000002 DF106 = 067555 DF170 = 067573 DF 252 = 067655 
ADDWS = 000000 BIT10 = 002000 DF107 = 067555 DF171 = 067573 DF 255 = 06766 
ADDW6 = 000000 BIT11 = 004000 DF11_ = 067533 DF172 = 067573 F254 = 067655 
ADDW7 = 000000 ainte = 010000 DF110 = 067640 DF175 = 067614 DF255 = 067665 
ADDW8 = 000000 B1T13 = 020000 DF111 = 067533 DF174 = 067614 DF 256 = 067655 
ADDW9 = 000000 BIT14 = 040000 AL = 067533 DF175 = 067614 DF257 = 067655 
ADEVCT= 000000 B1T15 = 100000 DF1135 = 067555 DF176 = 067533 DF26 = 06755 
ADEVM = 000000 BIT2 = 000004 DF114 = 067640 DF177 7635 DF260 067671 
AENV. = 000000 BITS = 000010 DF115 = 067533 DF 2 067533 DF261 = 067671 
AENVM = 000000 BIT4 = 000020 DF116 = 067533 DF20 = 067533 Or see = 067671 
AFATAL= 000000 BITS = 00004 DF117 = 067555 DF200 = 067573 DF 265 = 067671 
1= 000000 BIT6 = 000100 DF12 067561 DF201 = 067573 DF 264 = 067671 
AMADR2= 000000 BIT? = 000200 DF120 = 067640 DF202 = 067573 DF265 = 067671 
AMADR3= 000000 BIT8 = 000400 DF121 = 067533 DF 203 = 067573 DF 266 = 067671 
AMADR4= 000000 BIT9 = 001000 OF Is¢ = 067533 F204 = 0675 DF 267 = 067671 
AMAMS1= 000000 BPTVEC= 000014 ors = 067555 DF205 = 067573 DF2?_ = 067533 
AMAMS2= 000000 BUTIN 056227 DF124 = 067640 DF206 = 06757 DF270 = 067671 
AMAMS3= 000000 BYTABL 043074 DF125 = 067533 DF207 = 06757 F271 = 067671 
= 000000 CCBDON 013742 DF126 = 067533 DF21 = 067561 DF a = 067671 
AMSGAD= 000000 CcB1 013646 DF127 = 067555 DF21G = 067573 DF 27 067712 
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DF274 = 067712 DF356 = 067655 DF44 = 067573 DH117 = 4 DH2B 066474 
DF275 = 067712 DF357 = 067655 DF440 = 067655 DH12 = 066633 DH20_ = 066570 
DF276 = 067712 DF36 = 067561 DF441 070203 DH120 = 066633 DH200 = 066747 
DF277 = 067712 DF360 = 067665 aie = 070203 DH121 = 570 DH201 = 066747 
DFS = 067533 DF 361 70066 DF443 = 070203 DH122 = 066460 DH202 = 066747 
DF30 = 067561 DF362 © 070112 DF444 = 067533 DH125 = 4 DH2035 = 066747 
DF 300 = 067712 363 070120 DF45 = 067573 DH124 = 33 DH204 = 066747 
DF301 067733 = 067555 DF46 = 067573 DH125 = 066570 DH205 = 066747 
DF302 = 067733 DF365 = 067 DF47 = 067573 DH126 = 066460 DH206 = 06674 
DF303 067757 DF366 070130 DFS 067543 DH127 = 066644 DH207 = 066747 
304 = 067733 DF367 070152 DFSO = 067573 DH13 066644 DH21- = 06663 
DF305 = 067733 37 067573 DF51 = 067573 DH130 = 066633 DH210 = 066747 
DF 306 = 067733 DF370 070162 DFS52 = 067573 DH131 = 066460 DH211 = 066747 
DF307 = 067733 DF371 = 000000 DF53 = 067573 DH132 = 066644 DHe12 = 066747 
DF31_ = 067555 DF372 = 000000 DF54 = 067573 DH133 = 066633 DH213 = 066747 
DF310 = 067733 DF 373 = 000000 DFS55 = 067573 DH134 = 066460 DH214 = 066747 
DF311 = 067733 DF374 = 000000 DF56 = 067573 DH135 = 33 DH215 = 066704 
DF312 = 067733 DF375 = 000000 DF57 = 067573 DH136 = 066633 DH216 = 066633 
DF313 = 067733 DF376 = 000000 DF6 067555 DH137 = 60 DH217 = 066570 
DF314 = 067733 DF377 = 000000 DF60 = 067573 DH14 = 4 DH22_ = 066633 
DF315 = 067733 DF4 = 067533 DF61 = 067573 DH140 = 33 DH220 = 066460 
DF316 = 067733 DF40 = 067573 DF62 = 067533 DH141 = 066570 DH221 = 066704 
DF317 = 067733 DF400 = DF63 = 067533 DH142 = 60 DH222 = 066633 
DF32 = 067533 DF401 = 067655 DF64 = 067543 DH143 = 066633 DH225 = 066570 
DF320 = 067733 DF402 = 067655 DF65 = 067533 DH144 = 066570 DH224 = 066460 
DF321 = 067733 DF403 = 067665 DF66 = 067533 DH145 = 066460 DH225 = 066570 
DF322 070003 DF404 = 067665 DF67 = 067533 DH146 = 066633 DH226 = 0664 
F323 = 070003 DF405 = 067655 DF7 = 067533 DH147 = 066570 DH227 9 067112 
DF324 070024 DF406 = 067655 DF70 = 067533 DH15 = 066633 DH227B 067124 
DF 325 = 070003 DF407 = 067665 DF71 640 DH150 = 066460 H23_ = 06664 
DF326 = 0 3 DF41 067614 DF72 = 067533 DH151 = 066633 DH230 = 066570 
DF327 = 070003 DF410 = 067665 DF73 = 067640 DH152 = 066570 D = 0664 
DF33_ = 067561 DF411 = 067655 DF74 = 067533 DH153 = 066460 DH232 = 067112 
DF 330 = 070003 DF412 = 067655 DF75 = 067533 DH154 = 066633 DH235 = 066570 
DF331 = 0 3 DF413 = 067665 DF76 = 067555 DH155 = 066570 H234 = 066460 
332 = 0 3 DF414 = 067665 DF77 = 067640 DH156 = 066460 DH235 = 067112 
DF 3335 = 070003 DF415 = 067655 DH1 066370 DH157 = 066633 DH236 = 066570 
DF 334 = 070003 DF416 = 067655 DH1B 066404 DH16 066704 DH237 = 066460 
DF335 = 070003 DF417 = 067 DH1C 066436 DH16B 066720 H24 = 066570 
DF 336 = 070003 DF42. = 067573 DH1D 066445 DH160 = 066570 DH240 = 067112 
DF337 = 070003 DF420 = 06766 DH10_ = 066633 DH161 = 60 DH241 = 066570 
DF34_ = 067555 DF421 = 067655 DH100 = 066570 DH162 = 066633 Duets = 066460 
DF 340 = 070003 DF422 = 067655 DH101 = 066460 DH1635 = 60 DH?’ 3 = 067112 
DF341 = 070003 DF423 = 067665 DH102 = 066644 DH164 = 066704 DHe-4 = 066570 
DF 342 = 070005 DF424 = 067665 DH103 = 066633 DH165 = 066747 DH245 = 066460 
DF 343 = 070003 DF425 = 067655 H104 = 066570 DH166 = 066747 DH246 = 066704 
DF 344 = 070003 DF426 = 067655 DH105 = 066460 DH167 = 066747 DH247 = 067112 
DF 345 = 070003 DF427 = 067665 DH106 = 066644 DH17 = 066644 DH25 = 066635 
DF 346 = 070003 DF43_ = 067573 DH107 = 066644 DH170 = 066747 DH250 = 066570 
DF347 070045 DF430 = 067665 DH11_ = 066570 DH171 = 066747 DH251 = 066460 
DF35 = 067533 DF431 = 067665 DH110 = 066633 DH172 = 066747 DHe52 = 066704 
DF350 = 070045 DF432 = 067655 DH111 = 066570 DH1735 = 067012 DH255 = 067112 
DF351 = 067665 DF4335 = 067655 Dut IS = 066460 DH174 = 067012 DH254 = 066704 
DF352 = 070045 DF434 = 067665 DH113 = 066644 DH175 = 067012 DH255 = 067112 
DF 3535 = 070045 DF435 = 067665 DH114 = 066633 176 = posnee DH256 = 066570 
DF 354 = 070045 DF436 = 067665 DH115 = 066570 DH177 06706 DH257 = 066460 
DF355 = 070045 DF437 = 067655 DH116 = 066460 DH2 066460 DH26 == 066644 
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DH260 = 066747 DH341 = 066747 DH413 = 4 DH75 = 066460 DT153 = 070276 
DH261 = 066747 DH342 = 066747 DH414 = 067112 DH76 = 066644 DT154 = 070320 
= 066747 DH = 066747 DH415 = 570 DH77 = 066633 DT155 = 070276 

DH263 = 066747 DH344 = 066747 DH416 = 60 DIDONE 3200 DT156 = 070276 
= 066747 DH = 066747 DH417 = 066644 DISPLA 001142 DT157 = 070320 

DH265 = 066747 DH346 = 066747 DH42 = 066747 DISPRE 0174 T16 070360 
= 066747 DH347 = 066747 DH420 = 067112 DS = 177570 DT160 = 070276 

DH267 = 066747 DH35_ = 066570 DH421 = 066570 DT1 070212 DT161 = 070276 
DH27 = 570 DH350 = 066747 H422 = 066460 DT10 = 070320 DT162 = 070320 
DH270 = 066747 DH351 = 066644 DH423 = 066644 DT100 = 070276 DT163 = 070276 
DH271 = 066747 DH352 = 066747 DH424 = 067112 DT101 = 070232 DT164 = 070276 
DH272 = 066747 DH353 = 066747 DH425 = 066570 DT102 = 070346 DT165 = 070402 
DH275 = 066747 DH354 = 066747 DH426 = 066460 DT103 = 070556 DT166 = 070402 
DH274 = 066747 DH355 = 066747 DH427 = 066644 DT104 = 070276 DT167 = 070402 
DH275 = 066747 DH356 = 066570 DH43_ = 747 DT105 = 070232 DT17_ = 070346 
DH276 = 066747 DH357 =: 067132 DH430 = 067112 DT106 = 070346 DT170 = 070402 
DH277 = 066747 DH357B 067146 DH431 = 066644 DT107 = 070346 DT171 = 070402 
DH3 066524 DH36_ = 3 DH432 = 066570 DT11_ = 070276 DT172 = 070402 
DH38 066540 DH360 = 066644 DH4335 = 066460 DT110 = 070556 DT1735 = 070446 
DH30_ = 066633 DH361 = 60 DH434 = 644 DT111 = 070276 DT174 = 070446 
DH300 = 066747 DH362 = 067176 DH435 = 067112 DT112 = 070232 DT175 = 070446 
DH301 = 066747 DH362B 7212 DH436 = 4 DT1135 = 070346 DT176 = 070276 
DH302 = 066747 DH363_ 067220 DH437 = 066570 DT114 = 070556 DT177 = 070512 
DH303 = 067012 DH3638 067234 DH44 = 066747 DT115 = 070276 DT2 070232 

304 = 066747 DH364_ 067260 DH440 = 570 DT116 = 070232 DT20 = 070 

DH305 = 066747 DH364B 067272 DH441_ 067502 DT117 = 070346 200 = 070402 
DH306 = 066747 DH365 067327 DH441B 067516 T12. = 070320 DT201 = 070402 
DH307 = 066747 DH366 067340 DH442 = 067327 DT120 = 070556 DT202 = 070402 
DH31_ = 4 DH366B 067354 DH443 = 27 DT121 = 070276 DT203 = 070402 
DH310 = 066747 DH367 067372 DH444 = 066524 DT122 = 070232 DT204 = 070402 
DH311 = 066747 DH367B 067406 DH45 = 47 DT123 = 070346 DT205 = 070402 
DH312 = 066747 DH37 066747 DH46 == 066747 DT124 = 070556 DT206 = 070402 
DH313 = 066747 H3 066762 DH47 = 066747 DT125 = 070276 DT207 = 070402 
DH314 = 066747 DH370 = 067437 DHS 066633 DT126 = 070232 DT21_ = 070320 
DH315 = 066747 DH371 = 000000 DH50 = 066747 DT127 = 070346 DT210 = 070402 
DH316 = 066747 DH372 = 000000 DH51 = 066747 = 070346 DT211 = 070402 
DH317 = 066747 DH3735 = 000000 DH52 = 066747 DT130 = 070556 DT212 = 070402 
DH32_ = 066570 DH374 = 000000 DH53 = 067012 DT131 = 070232 DT215 = 070402 
DH320 = 066747 DH375 = 000000 DH54 = 066747 DT132 = 070346 DT214 = 070402 
DH321 = 06674 DH376 = 000000 DHS5 = 066747 DT135 = 070556 DT215 = 070276 
DH322 = 06674 DH377 = 000000 DH56 = 066747 DT134 = 070232 DT216 = 070320 
DH323 = 066747 DH4 066570 DH57 = 066747 DT135 = 070320 DT217 = 070276 
DH324 = 067012 DH48 066604 DH6 == 066633 DT136 = 070320 DT22 = 070520 
DH325 = 066747 DH40_ = 066747 DH60 = 066747 DT137 = 070360 DT220 = 070276 
DH326 = 066747 DH400 = 000000 DH61 = 066747 T14 = 070346 DT221 = 070276 
DH327 = 066747 DH401 = 066570 DH62 = 066460 DT140 = 070320 DT222 = 070520 
DH33_ = 066633 DH402 = 066460 DH63 = 066524 DT141 = 070276 DT225 = 070276 
DH330 = 066747 DH403 = 066644 DH64 = 0666353 DT142 = 070276 DT224 = 070276 
DH331 = 066747 DH404 = 067112 DH65 = 066460 DT143 = 070320 DT225 = 070276 
DH332 = 066747 DH405 = 066570 DH66 = 066570 DT144 = 070276 DT226 = 070276 
DH3335 = 066747 DH406 = 066460 DH67 = 066460 DT145 = 070276 DT227 = 070346 
DH334 = 066747 DH407 = 066644 DH? = =_ 066570 DT146 = 070320 DT23 = 070346 
DH335 = 066747 DH41 067012 DH70 = 066524 DT147 = a 6 DT230 = 070276 
DH336 = 066747 DH41B 067026 DH71 = 066653 DT15. = 070 $0 T231 = 070276 
DH337 = 066747 DH410 = 067112 DH72 = 066460 DT150 = BeOS 6 DT232 = 070546 
34 = 06664 DH411 = 066570 DH73 = 066633 DT151 = 070320 DT233 = 070276 
DH340 = 066747 DH412 = 066460 DH74 = 066570 DT152 = 070276 DT234 = 070276 
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DT235 = 070346 DT317 = 070612 DT400 = 000000 D163 = 070360 M115 053314 
DT236 = 070276 T32_ = 070360 DT401 = 070276 D164 = 070320 M116 053330 
DT237 = 070276 DT320 = 070612 DT402 = 070276 DT65 = 070360 EM117 = 053344 
DT24 = 070 T321 = 07 DT403 = 070346 DT66 = 070276 EM117B8 053360 
DT240 = 07034 DT322 6070736 DT404 = 070346 DT67 = 070276 12 050340 
DT241 = 070276 DT325 = 070736 DT405 = 070276 T? = 070276 EM120 053367 
DT242 = 070276 D1324 =©071002 DT406 = 070276 DT70 = 070276 EM121 053402 
DT243 = 070346 DT325 = 070736 DT407 = 070346 DT71 070522 EMi22 = 053416 
DT244 = 070276 DT326 = 070736 DT41 070446 DT72 = 070276 EM123 = 053432 
DT245 = 070276 DT327 = 070736 DT410 = 070346 DT73 070556 EM1238 053446 
T246 = 07027 = 070320 DT411 = 070276 DT74 = 070276 EM124 053456 
DT247 = 070346 DT330 = 070756 DT412 = 070276 DT75 = 070232 EM125 053472 
DT25 = 070320 DT331 = 070736 DT4135 = 070346 DT76 = 070346 EM126 053506 
DT250 = 070276 DT332 = 070736 DT414 = 070346 DT77__= 070556 EM127_ = 053522 
DT251 = 070276 DT3335 = 070736 . DT415 = 070276 EEBBFO 014416 EM1278 36 
DT252 = 070276 DT334 = 070736 DT416 = 070276 EEBBF1 014426 EM13 050352 
DT2535 = 070346 DT335 = 070736 DT417 = 070346 014552 EM13A 
DT254 = 070276 7336 = 070736 DT42 = 070402 EEBTP1 014376 EM138 050374 
DT255 = 070346 DT337 = 070736 D1420 = 070346 EEBTP2 014406 EM130 053546 
DT256 = 070276 DT34 = 070346 DT421 = 070276 014266 EM131 053562 
DT257 = 070276 DT340 = 070736 DT422 = 070276 EEB10 014436 EM132 053576 
DT26 = 346 DT341 = 070736 DT423 = 07034 EEB15 014472 EM132B 
DT260 = 070402 DT342 = 070736 DT424 = 070346 EB2 014336 EM133 053625 
DT261 = 070402 DT343 = 070736 DT425 = 070276 EEB20 014520 EM134 
DT262 = 070402 DT344 = 070736 DT426 = 070276 EEB25 014536 EM135 0 
DT2635 = 070402 DT345 = 070736 DT427 = 070346 CDON 024550 EM1 053722 
DT264 = 070402 DT346 = 070736 143 = 070402 EECTP1 024440 EM137 0 
DT265 = 070402 DT347 = 070736 DT430 = 07034 EECTP2 024450 EM14 = 050352 
DT266 = 070402 = 070360 DT431 = 07034 EC1 024344 EM140 053752 
T267 = 070402 DT350 = 070736 DT432 = 070276 EEC1IO 024462 EM141 0 
DT27_ = 070360 DT351 = 070346 DT433 = 070276 EEC11 024500 EM141C 0 
DT270 = 070402 DT352 = 070736 DT434 = 07034 EC2 024406 EM14 54024 
DT271 = 070402 DT355 = 070736 DT435 = 070346 024516 EM143 04 
DT272 = 070402 DT354 = 070736 DT436 = 070346 EMTVEC= 30 EM144 054054 
DT273 = 070402 DT355 = 070736 DT437 = 070276 EM 7662 EM145 054072 
DT274 = 070402 DT356 = 070232 DT44 = 07040 EM1B 047676 EM146 
DT275 = 070402 DT357 = 070254 DT440 = 070276 EM1C 7707 EM147 8054122 
DT276 = 070402 D = 070320 DT441 071256 EM1D 047726 EM15 
DT277 = 070402 DT360 = 070346 DT442 = 071274 EM10 050275 EM150 054142 
DT3 070254 DT361 = 070612 DT4435 = 071274 EM100 053032 EM151 054156 
= 070320 DT362 6071046 DT444 = 070 EM101 053046 EM152 054172 
DT300 = 07040 DT365 071064 DT45 = 07 EM102. 053062 EM153 054212 
DT301 0706 DT364 071106 DT46 == 070402 EM102B 053076 EM154 054226 
DT302 = 070612 DT365 = 070346 DT47 = 070402 EM103 053105 EM155 054242 
0 DT366 «=: 071120 DT5 070320 EM104 053120 EM156 054262 
DT304 = 070612 4h aay DTS5O = 07 EM105 053134 EM157 54276 
DT305 = 070612 B70ses DT51 = 070402 053150 EM157B 054312 
DT = 07061 DT 370 071212 DT52 = 070402 053164 EM16 04 
DT307 = 070612 DT371 = 000000 DT53 = 070446 EM107 = 053174 EM160 054321 
DT31_ = 070 D1T372 = 000000 DT54 = 070402 EM11 050310 05434 
DT310 = 070612 DT375 = 000000 DT55 = 07 EM11B 050326 EM161 05436 
DT311 = 070612 DT374 = 000000 DT56 = 070402 EM110 053210 EM162 054402 
DT312 = 070612 DT375 = 000000 DT57 = 070402 EM111 053224 EM16 054416 
DT313 = 070612 DT376 = 000000 DT6 070346 EM11 053240 EM16 054426 
DT314 = 070612 D1T377 = 000000 DT60 = 070402 EM11 053254 054442 
DT315 = 070612 DT4 070276 DT61 = 070402 EM1138 Baegrn EM165 054472 
DT316 = 070612 DT40 = 070402 DT62 = 070360 EM114 053500 EM166 054506. ; 
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EM167 054522 EM235 056632 EM276 060247 EM341 
EM17 050456 EM236 056644 EM276C 060262 EM34 
EM17B 050470 EM236B 056656 EM277 060334 EM34 
EM170 054536 EM237 56671 ee 060350 EM344 
EM171 054552 EM24 050557 E 047766 EM345 
—EM172 566 EM240 056702 EM38 050002 E 
054602 EM24 056714 EM30 050650 EM346C 
EM174 054616 EM241B 056726 EM300 
EM175 054632 EM242 = 056741 EM300C 060424 
EM176 054646 EM245 056752 EM301 EM35 
EM1768 EM244 056764 EM301B 060510 EM350 
EM177 + =054670 EM244B 056776 EM30 060525 EM351 
EM245 057010 EM30 060534 EM352 
EM2CB = «OG EM246 8057022 EM304_ 060546 EM353 
EM20 8 950502 EM246B 7 EM304C 060562 EM354 
54 EM247 89057073 EM305_ 06062 EM355 
054742 E 050574 EM305C EM356 
EM201 EM250 057104 E 060 EM3568 
EM202 055050 EM250B 057116 EM307 = 061030 EM357 
EM203 055122 EM251 057131 0 
055244 EM252 = 057022 EM31B 050674 E 
C 62 EM252B 057142 EM310 EM361 
EM20S5 055317 EM253 057156 EM311 061154 
EM206 055370 EM254 = 057022 EM312 061224 EM365 
EM207 EM254B8 057170 EM313 0612 E 
EM255 057206 EM314 061344 EM365 
EM210 055514 EM256 057232 EM315 061414 EM366 
EM211 EM256B 057244 EM316 0614 EM367 
EM212 EM257 057260 EM317 1 E 
EM213_ 055716 E 50606 EM32 050706 EM370 
EM213C EM268 50620 EM320 EM371 
EM260 057272 EM321 061654 EM372 
EM214 056027 EM2 57304 EM322 1724 E 
56104 EM261 057330 EM322B 061736 EM37: 
EM215 056114 EM262 57342 EM323 061762 EM375 
6 56251 EM2 057415 EM324 061774 EM376 
EM217 EM2 057430 EM325 EM377 
EM22 = 050520 EM263B 057442 EM325B 062022 EM4 
56304 EM264 057455 EM3S25C 062055 EM4A 
EM221 056 EM264C 057470 EM326 = 006 
EM222 056 EM265_ 057542 oe’ 062132 EM4C 
2 EM265C 057556 EMS 050724 EM4D 
24 056424 0576135 EM330 062202 EM40 
EM225 0 67 5766 EM331 062256 
EM225B8 05645 EM267C 057702 EM332 062526 
0 7 5063 EM332B 062342 EM401B 
EM227 056474 EM270 38057754 EM332C 062355 M402 
ous 056506 EM270C 057770 EM333 = 061762 EM403 
050532 EM271 E 062424 EM4038 
EM23B 050544 EM271C 060022 EM334C 062440 EM4035C 
EM230 056525 EM272 5 EM335 062507 
308 056536 ers ec 060060 EMS 062556 EM405 
EM231 056550 EM2 060115 EMS36C 062574 
32 056562 EM2738 060126 EM337 062613 EM407 
EM235 056574 EM274 060152 EM34 050736 
EM2338 056606 EM275 060164 EM34B 050750 EM410 
34 056620 EM275B8 060234 EM340 06266 EM411 
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EMS6_ = 051610 FFCDON 024752 D 0164 KIPAR3= 17g306 LLB25 017156 
EMS6B8 052007 FFCTP1 024644 DST 2376 KIPAR4= 172350 LLCDON 030254 
EMS7 = 051610 FFCTP2 024654 | 2252 KIPAR7= 172 LLC 027252 
78 2062 FFC1 I 1150 1 
FFC10 I 22 1 
C11 I $$ 1 
1 1 
1 
1 
0 
0 
0 
0 
0 


GGC10 025062 25474 KKC12 1 MMCDON 032122 
EM74 052714 GGC11 0251 INBIT KKC13 026450 MMC1 0 
7 30 C2 025016 INSTOF 050216 14 2 MMC10 §=031116 
EM76 052744 GGC20 025136 I0P1B_ = 055237 KKC15 026544 MMC11 «= 031174 
EM76A 052760 GGC25 025116 IOTRAP= KKC16 MMC12 031252 
EM76B 52767 GTSWR = 104405 IOTVEC= 0000 KKC17 6640 MMC 13 330 
EM77 05 HHBBFO 015476 XNBT 057 C18 026676 MMC14 031406 
ENDTES 04 HHBBF 1 55 JJBBFO 016272 KKC19 026734 MMC15 
ENDTST 040072 HHBD 5632 JJBBF1 016302 KKC2 0257 MMC16 38031542 
EQASCI 044504 HHBTP1 015446 JJBDON 016426 KKC20 026772 MMC2 
ERM10 044406 HHBTP2 015466 JJBTP1 016250 KKC3 025774 MMCS 030414 
ERRNUM 047104 HHB1 5336 JJBTP2 016262 KKC4 026032 MMC4 
E = 104000 HHB10 8015516 JJB1 016136 KKCS 026070 MMCS 030550 
= HHB15 015552 JJB10 016312 KKC6 026126 MMC6 0 6 
ERTYPE HHB2 015406 JJB15 016346 KKC7 026164 MMC7 0 
ERT1 HHB20 8 015600 JJB2 016206 KKC8 026222 MMC8 030762 
ERT2 047054 HHB25 015616 JJB20 016374 KKC9 026260 MMC9 04 
ERTS 04 HHCDON 025422 JJB25_ 016412 1 0712 MMRO = 177572 
ERT4 04 HHCTP1 025274 K 172360 LDCDSU 030050 MMR2 = 17757 
ERTS 047100 HHCTP2 025 KDPAR1= 172362 LDCFSU 027032 MARS = 172516 
EXPCTD 043156 HHC1 025174 KDPAR2= 172364 LDC 7236 MMVECT= 000250 
FALTRP 041570 HHC10 §=025314 K 172366 LDXSUB 03162 = 44 
FFBBFO 01 HHC11 025332 KDPAR4= 1 $5350 LDX 03211 MODE1 040622 
FFBBF1 014716 HHC2 OS? +6 KDPAR7= 172376 LF = 1 MS1 047505 
FFBDON 015042 HHC20 3602537 Hee 0 LLBBFO 01705 MS10 = 047545 
FFBTP1 01 HHC25 025350 KDPDR1= 172322 LLBBF1 017 MS11 7 
FFBTP2 014676 HT S 11 KDPDR2= 172324 LLBDON 017172 SS 7523 
FFB1 014556 IBKOUT 051776 K 17 $58 LLBTP1 017034 MS 76 
FFB10 }§014726 IBSAVE KDPDR4= 1725. LLBTP2 017044 eet rots 
FFB15 014762 ICOUT KDPDR7= 1723 1 16734 MS oe3 
FFB2 014626 IDONE 040104 KIPARO= 17234 LLB1 17074 MS4 756 
FFB20 015010 IENBT 051544 KIPAR1= 17234 LLB1 17130 
FFB25 015026 IEZBT 051240 KIPAR2= 172344 B2 01 


7000 NATBF1 038574 | 


. 
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SYMBOL TABLE | 
NATER1 023524 00C25 032560 Q081 020272 RRR10 007742 STORE 043014 
NATER2 023542 OOODON 006736 Q0810 020436 RRR11 007764 STXBF 036726 
NATERS 023556 O00OT 006646 00815 020456 RRR12 010004 STXSUB 036520 
NATINS 023252 0001 006602 Q0B2. 020342 RRR15 010036 SWR 001140 | 
NATRET 3% 0002 006626 QQB20 020474 RRR2 007 SWREG 000176 
NATSUB 023172 0003 QQCDON 033302 RRR¢S 010016 SwO = 000001 | 
NEGDAR 056355 QQCTBO 033150 007 SwOO = 000001 
NEGDNR 056151 OR 055232 QQCTB1 033154 RRR4 007670 SwO1 = 000002 
NABBFO 017566 PASCIZ 047106 QQCTB2 033164 RSETUP= 104412 SwO2 = 000004 
NNBDON 017646 PCBAD 056163 QQC1 033044 RTI 042772 $w03 = 000010 
NNBTP1 017546 PERIOD 056225 Q0C10 033170 R6  =%000006 $w04 = 000020 | 
NABTP2 017556 PIRQ = 177772 aac15 033210 R? —_ =%000007 SwOS = 000040 
NNB1 017450 PIRQVE= 000240 QQC2 033116 SAVIOT 040522 5w06 = 000700 
NNB10 017576 POWERM 047434 QQC20 033232 SAVREG* 104410 SwO7 = 000200 
NNB11 017626 266 QQC25 033254 SCOPE = 009004 SWO8 = 000400 
NNBI15 017632 PPBTP1 020174 RQQBFO 007342 SPACE 047500 swO9 = 001000 
017474 PPBTP2 020204 QQQBF1 007356 SR1. = 177574 SW1 = 000002 
NNCDON 032 PPB1 0062 QQQD0N 007560 1152 SW10 = 002000 
NNCTBO 032226 PPB10 020214 QQQTP1 007372 SSBTP1 021056 SW11 = 004000 
NNCTB1 032232 PPB15 0234 aaq1 007202 SSBTP2 Swi2 = 010000 
1 32 020130 00010 7402 SSBTP3 021076 SW13 = 020000 
NNC1O 032242 PPB20 020252 aaq2. =: 007220 S 34 SW14 = 040000 
NNC15 PPCDON 033040 aa020 007422 $SB10 00 SW15 = 100000 
NNC2 032174 PPCTBO 032712 Q0022 007436 $SB15 021120 SW2 = 000004 
PPCTB1 032716 Q0023 007470 $SB2. 021012 SW3 = 000010 
NNC25 032326 PPC1 032612 00024 007516 $SB20 36 SW4 = 000020 
NODAT PPC10 032726 Q0025 007542 SCDON 034020 SwW5 = 000040 
050233 PPC15 032746 aq03 §©=._: 007256 SSCTBO SW6 = 000100 
NOS PPC2 a004 7304 SSCTB1 033670 SW7 = 00020¢ 
N1 050235 pp 032770 RDCHR = 104407 SSC1 033552 SW8 = 000400 
N10 PPC25 033012 RESREG= 104411 $SC10 00 = 001000 
050237 PPPBF 71 RESVEC= 000010 $5C15 033720 T = 11 
N244 PPPBF1 007114 RET 042750 $SC2 3622 TBITVE= 14 
050241 P 007176 RRBDON 020730 SSC20 033742 TCCBFO 025654 
N3132 055632 PPPTP1 007130 RRBTP1 02 $$C25 64 TCCBF1 025664 
050243 PPP1 006742 RRBTP2 02 $SC30 034014 025674 
NS 050245 PPP10 007140 RRBTP3 0206 SSA1_ 010254 TCC1 025542 
N6 050247 PPP15 007160 RRB1—-s« 020514 SSBFO 010244 TCC2 025564 
7 050251 760 RRB10 020656 SSSDON 010412 TCC3 025630 
N746T2 056140 PPP3 007022 RRB15 02067 SSSTP1 0102 TKVEC = 
N747T2 056344 PPP, 7042 RRB2 020570 SSSTP2 010274 TPVEC = 
= 3 RRB20 020714 SSS 010106 TRAPTO 066276 
OOBTP1 017764 PRST 050176 RRCDON 033546 $S$S10 010304 TRAPV 040010 
OOBTP2 017774 = RRCTBO 033414 $$S11 010326 TRAPVE= 000034 
1 017652 PRI = 0 RRCTB1 033420 $S$815 010336 TRPV 041636 
00810 PR2 = 000100 RRCTB2 033430 SSS 010164 TRTVEC= 000014 
00815 0024 PR3 = 000140 C1 033306 $SS20 010354 
017720 = 000200 RRC10 033434 $$S25 010374 TST10 011134 
020042 PRS = 000240 C15 033454 STACK = 001100 00 037536 
DON 032 PR6 = 000300 RRC2 033362 T 006116 TST101 037620 
OOCTBO 032460 PR7 = 000340 RRC20 033476 STCDFS 013036 TST102 037636 
OOCTB1 032 PS = 177776 RRC25 033520 013320 TST103 037674 
1 032 PSW = 177776 DON 010102 STCFDS 012202 TST104 037732 
00C10 032474 PWRVEC= 24 RRREXP 007732 STCFT 012464 TST105 0405 
00C15 032514 QQBDON 020510 RRRTP1 007712 STCIBF 036146 7106 040602 
00C2 032426 QQBTP1 020406 RRRTP2 007722 STCSUB 0356 TST107 040670 
00620 032536 QQBTP2 020426 RRR1 007564 STKLMT= 177774 TST11 011370 










C 6 
CKFPCCO FP11F FLTG PNT PRT C MACRO M1113 O9-APR-81 13:53 PAGE 102-13 SEQUENCE 275 
SYMBOL TABLE 


TST110 040762 TST7 010664 UuC2 034340 . WwwC2 034564 ZZCBF 8037132 
TST111 0461116 TST70 6034 uuc3 034350 WwWC4 034630 ZZCDON 037144 
TST112 041212 TST71 034412 1 011020 WwwC5 034 2ZC1 4 
TST113 041304 TST72 034516 011022 WwWC6 034740 2Z€10 04 
TST114 041434 TST73 = 036 011024 WwWC7 03 ZZCi2 = 037120 
TST115 043202 TST74 036230 UUUBFO 011006 WwwC8 035050 ZZC15 = 037124 
TST12 011642 TST75 = 036742 011132 wwC9 035114 zZ¢2 036 
TST13 = 012476 TST76 = 037424 UUUTP1 011032 WWWBFO 011520 223 037002 
TST14 013332 TST77 = 037454 1 010666 WWwWBF1 011540 22¢5 037 
TST15 = 013432 TT 021362 uuu10 §=011042 WWWDON 011640 ZZF1 037426 
TST16 + TTBTP1 021270 UUU11 = 011064 WwWTP1 011530 ZZZDON 013430 
TST17 =. 013744 TTBTP2 021 UUU15 = 011076 Ww 1 011372 2221 0133 
TST2 40 TTB1 021156 2 010752 WwW10 011550 22Z10 +=013376 
TST20 014046 TTB10 §=©021310 Uuu20 = 011114 WwW11 011572 2ZZ15—s «1 
TST21 TTB15 021330 3 010776 WwW15 011604 2ZZ2 013352 
TST22 014554 TTB2 021224 VVBDON 01404 Wwe 011462 SAPTHD 0061 
TST23. 015044 TTB20 021346 vvB1 013746 WwW20 011622 SATYC 045320 
TST24 015334 TTCDON 034304 vvB10 014010 XXBD 022052 $ATY1 045274 
TST25 015634 TBO 144 VVB15 014026 XXBTP1 021740 SATY3 045302 
016134 TTCTB1 034150 VVB2 013764 XXBTP2 021750 S$ATYS 045312 
TST27 TTCTB2 034160 VVCBFO 034506 XXB 021614 $AUT08 9 0011 
TST3 00 TTC1 034024 VVCDON 034514 XXB10 2 $BASE 001372 
TST30 §©016732 TTC10 VVCTP1 034474 XXB15 022020 $BDADR 001122 
TST31 017174 TTC15 04 vvC1 034414 XXB2 $BDDAT 001126 
TST32 4 ©017446 . 034102 vvC2 034444 XXB20 022036 $BELL 001 
TST33 =©017650 TTC20 §034226 vvC3 034454 XXB25 60 $CDW1 001376 
TST34 TTC25 034250 VVVBFO 011256 XXCDON 036226 $CDW2 001400 
TST35 020270 TTC30 VVVDON 011366 XXC1 036162 SCHARC 045042 
TST36 =: 0205112 TTTAI 10550 VVVTP1 011266 XXXDON 012474 SCKSWR 045542 
TST37 ©=©.020732 TTT. 010552 vvv1 011136 XXX1 $CLR.T 043412 
TST4 756 TTT 010554 vvV10. =: 011276 XXX2 011720 SCMTAG 001100 
TST40 §=021154 TTTBFO 010536 vvv11 =: 011320 XXX3 011774 = 000024 
TST41 TTTDON 0662 vwv15 9011332 XXX4 012050 $C = 000050 
TST42 =©021612 TTTTP1 010562 vvv2 011220 XXXS 012124 $CMS = 000024 
TST43 022054 TTT1 10416 vvv20_ 011350 YYBDON 022324 $ = 000024 
TST44 022326 TTT10 =©010572 WENTTO 050204 YYBTP1 022210 SCNTLG 046161 
TST45 023610 TTT11 010614 WWBDON 023606 YYBTP2 022220 SCNTLU 046154 
TST46 770 TTT15 010626 1 022330 YYBTPS 022230 $ 
TST47 024146 TTT2 010502 WwB2 2406 YYB1 022056 SCRLF 001313 
TSTS 010104 TTT20 010644 WWB3 022464 YYB10 022252 001402 
TSTSO 24342 TTTS 010526 WWA4 022542 YYB15 022272 001404 
TSTS1 024552 TYPE = 104401 WWi35 022620 YYB2 022136 S$DDW10 001426 
TSTS2 024754 TYPOC = 104402 022676 YYB20 022310 1430 
TST53) = 025172 TYPON = 104404 WWB7 022754 YYB25 022232 $DDWI2 001432 
TST54 025424 TYPOS = 104403 WWB8 023032 YYCDON 036740 $DDW15 001434 
TST55 §=©025540 UUBDON 021610 WWB9 023110 YYC1 036232 $DDW14 001436 
TST56 §©025676 UUBTP1 021442 WWCDON 036156 yYc2 036270 $DDW15 001440 
TSTS7 027250 UUBTP2 021514 WwwC1 034520 yyc3 036326 D 001406 
TST6 010414 UUB1 wwC10 35160 YYC4 036 S$ODW 001410 
TST60 030256 UUB10 021524 WWC11 035224 yycs 036422 $DD..4 001412 
TST61 032124 UuB15 021562 WwC12 035270 YYC6 0 001414 
TST62 356 UUB2 1440 WWC13 035334 YYYDON 013330 $DDW6 001416 
TST63 032610 UUB20) §=021544 WWC14 035400 yyY1 012500 $DDW? 001420 
TST64 2 UUCBFO 034402 WWC15 035444 YYY 012554 SDDWB 001422 
TST65 304 UUCDON 034410 WWC16 035510 YYY 012630 $D 001424 
TST66 033550 UUCTP1 034370 WWC17 035554 YYY4 012704 SDEVCT 001326 
C1 WwwC18 035620 O12 SDEVM 0013574 
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SDOAGN 043432 $L 043470 046430 SSETUP= 000137 STMPS 001244 
043422 SLPADR 001106 046346 $STUP = 177777 STMP6 001246 
SENDCT 043236 SLPERR 001110 SQUES 001312 $SVLAD 3750 STMP7 001250 
SENULL 043476 SMADR1 001350 SRDCHR 046024 $SVPC = 006102 STN) = 000115 
SENV 001336 001354 $RDSZ = 000001 $SWR = 177400 $T 001152 
SENVM = =001337 001360 $SREGAD 001160 SSWREG 001340 STPFLG 001157 
043202 SMADR4 001364 $REGO 001162 < $TP 001150 
T 04 SMAIL. 001316 EG] 001164 SSWRMS= 000200 STRAP 046210 
SERFLG 001103 1 001346 $REGIO 001202 $TAB 047503 $TRAP2 046232 
SERMAX 001115 SMAMS2 001352 $REG11 001204 $TBIT 043474 $TRP = 000014 
SERROR 044026 SMAMSS 001356 $REGI2 001206 STERM = 0 STRPAD 046244 
001116 SMAMS4 001362 $REGI5 001210 STESTN 001322 STSTM 
SERRTB 001442 SMBADR 006104 $REG14 001212 STIMES 001302 STSTNM 001102 
SERTTL 001112 SMFLG 045536 $REGIS 001214 $ 001146 STYPE & 
SESCAP 1 SMNEW 046177 $REGI6 001216 $TKS 001144 STYPEC 044724 
001336 SMS 001332 $REG17 001220 001232 STYPEX 045044 
SETEND SMSGLG 13 $SREG 001166 STMP1 001234 $TYPOC 045072 
SFATAL 001320 SMSGTY 001316 $REG2Z0 001222 STMP10 001252 STYPON 045106 
SFFLG SMSWR $REG21 001224 $TMP11 001254 $TYPOS 
SFILLC 001156 SMTYP1 001347 $SREG22 001226 STMP12 001256 001330 
SFILLS 001155 SMTYP2 001353 $REG2S 001230 STMP13 001260 SUNITM 
001120 SMTYPS 001357 E 001170 STMP14 001262 SUSWR 001342 
SGDDAT 001124 SMTYP4 00136 E 001172 STMP15 001264 $VECT1 
SGET42 043374 SMXCNT 044022 $REGS 001174 STMP16 001266 $VECT2 001370 
045612 $NULL_ 001154 $REG6 001176 $TMP17 001270 S$XOFF = 000023 
= SNWTST= $REG7 001200 001236 $x = 
SHISTS 006102 SOCNT 045270 SRESRE 044446 STMP20 001272 $XTSTR 043514 
SICNT 001104 SOMODE 045272 SRTNAD 043472 STMP21 001274 $$GET4= 000001 
SILLUP 046452 SOVER 044004 SRTRN 043466 STMP22 001276 SOFILL 045271 
SINTAG 001135 SPASS 001324 SSAVRE 044410 STMP23 001 -LPER 047356 
SITEMB 001114 SPASTM 006110 SSAVR6 046456 STMPS 001240 RSET 
SLF 001314 SPWRAD 046434 SSCOPE 043502 STMP4 001242 -$X = 006102 
SLFLG 045537 SPWRDN 046274 
- ABS. 071306 


000000 001 
ERRORS DETECTED: 0 


VIRTUAL MEMORY USED: 60456 WORDS ( 237 PAGES) 
: 20034 WORDS ( 77 PAGES) 
ELAPSED TIME: 


00:50:11 
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